!♦ The Tech/News Joumal For Commodore Computers Vol. 4. 

April 1 983 







PRnCRPMflflPJ E 

C6»«TaaQ23P 

nj-nrnccREEW 



tflTBTHflPaLPTDn ' * 

CflTflLQG [• 

EHTn^rDlflTDH 



ChaEUlCILHBEI 



Issue 03 
$2.95 



• BUTTtiinEi-Di 

» QfH LE> nun 



KIQAEr^TEB /•/ 



z^u 



zm\^c num 






KIQHDFnQ 



MflWflGER 



M t 



i'» 



» 



*»J 



T-^'frT 



^TT 



tV 



* T 



4^nv 



f*^- 



■^*fru 



T^if 



'J..* 



•^_,.M^ 



/ 



13 - J 



-^ 



\^ 



^icA€/'<UeV€iUc^m*HUHic€ttio4U 




1O610 BAYVIEW (Bayview Plaza) 
RICHMOND HILL, ONTARIO. CANADA L4C3Ne 

(416) 864-4165 

C64-LINK' 

The Smart 64 



vS^ 



M«nv mor« A4i 








SpoQlIno 

to 

Primer 



Expinaton ALol 



SflrtBl 
Audio I/O 
fiwltch PF vidM Port 



C«»iitt« Port 



Ut«fi Port 




® ■ 




C64-LINK 




CP/M* 


1 


POWER* 
And 
PAL« 


1 


Otntr 

Cerlrrdgna 


local CommoiJ 



l£EE Dtlhft 

(2031) (4040) 
(BOBO) (B25G) 

(9000) 



IE£E Printtra 
(4022)(BO?3| 

(6300) 
• 10. 




T«pi 



1541 Drive 
And 

1fi2fi Prlninr 
or 151fi Prlnltr 



or VL3 Ciblfl 

to Piraltfll 
Printer 



lECEioParsMal 

intarfac* 

PsraMfll 
D«vlc«t 



tEEE to SorUI 

Intarfico 

Trua Sarlal 
DavlcoB 



or VL4 Cabli 

lo Btandarci 
Modam 




Give These Expanded 
Capabilities To Your 64 

-k Th« tblllty to ir«nif«r dau from arir lypa of d«vkt to •nol'iar Olll. iorlat, 
Paraiiffij 

•k BAStC 4 which %\\ry*t\ yoi' to run mgr^ PET BAQIC progrania and Qlvai you 
axiandtd dUk BntJ HO oommKiidi. 

ih Th« ability to hav# Mvarai 64* on IJna togathar - aharhg oommon illl 
d«vk« >uQh w JlthB or prlfilvn wMti Spoollno Oipibllliy. 

* Built-in mMTiln* lanQiiao* monitor 

* A bulll-ln fafmlnal or frtodam program wnich iirowi tht lyitam lo Oommunl- 

oalt IhrouQh I mndom la many bullaMn beard ayalami and othar ccmputar 
malnframi 



Capyrlghti and Tr*diiTwrt(i 

rA4 !■ ■ Anpy'lah* \\\ i ■i^h k'nn fiL^HirtHn MiU'hlrta*. 

llM, CM-LINK II d loijypljNf \\\ Mli:tivdlii Tala- 
aMnmUfilc«1lDna CI'^M »» a rvuitiafal lr»lnri>Hfi< ^f 
Digiial ftiiHlroh PlJWtn ll i I'Minniivh nf P'ni' 
111 ftufiwvt, |*AL ll i cuijvtl[thl or Hrwl 



• CoT^patlblilty with CP/M 



dealer 



a; 



pwon 



Editorial 3 

News BRK 4 

Bits and Pieces 18 

CompuKinks 25 

Transbloopors 26 

The WordPro Book of Tricks 27 

The MANAGER Column 30 

TPUG Library Filenames 32 

Sweet Sixteen 34 

VIC 20 Screen Centering 36 

Catstrapolator 39 

Making Friends With SID, Part 2 42 

Commodore 64 Character Sets 46 

Programmable Character Editor .... 50 

Commodore 64 Hi-Res Dumper 52 

BASIC Une LabeUng 54 

Commodore 64 Tiny-Aid 60 

1982 Magazine Bibliography 67 

Advertising Section 74 

Advertising Index 80 



T1i# Ihvn jotf or 



JttfHl 1 983 



lb b.w3^Jn..r9'Rr?ESE.?CHKlK. 



FrIItor 

K^rlJ. H. Hildon 

Advertisltiff Manager 

4]G82BlbH3 

Contribultns Writers 
Dave Berezowski 
Jim ButtL^rficId 
Gijfd Campbell 
Mjke Doneflan 
Donnfl Green 
Paul rii^ijiboltom 

Dave Hixik 
Eike Kaiser 
Peter Lear 
BUI MacUan 

John Sioveken 
Don White 

ProductUin 

A Ilk Typesenidg Lid. 

Printtng 

Squire & Carter Ltd- 

Artwork / Cover Art 

John M<it:taccj 



Program Listings In The Transactor 

All proRrams listed In The Transactor will apjiear a-; ihey wouH on your screen in Upfwr/Lower case 

mnde To darifj^ two polemial character mtJt-ups, zeroes will appear as 0' and rhe letiei "o" will of tuuise 

be in lower case. Secondly, Iht iuwet tase L(T) liia a (lanop asopposed lo ihe number I which has an 
angled lop. 

Many programs wll| conialn reverse video characters Iha! repres^ni cursor movements, colours, or 
lunction ke>'5, TTnese ^ill also tie shown exactly as ihej' would appear on your screen, but ihe>>e listed 
hprp fnr rpfprence 

Occasionally prc^ram« will contain lines that show conseculive spaces Often the number of spaces you 

insert Wilt not be critical to con^ct operation of the program. WheJi it v>. the requirMl niimt>er of spaces 
will be showji. For example: 



print 



Mush right" - would be shown as - print" (apace 10] flush rJghi' 

Curaor Characters For PET / CBM / VIC / 64 

Dowi - Q innerl 

Up - I DelPle 

Rl«hl -I OeirScm- 

Lcn - |Ut| tiome 

fiVS ,B STOP 
RV5 Off - ■ 
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accuracy isa major objective. The Transactor can noi assume liability forerrctrs in ankles or programs. 
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Make Extra CASH from The Transactor 

As of this issue. The Transartor will pay for alJ material 
accepted for publication. To start, the rales will be $20 per 
typeset page up to a maximum of $60. 

As The Transactor grows, so wilt our remuneration, and of 
course the maximum will be lifted. However, research on 
aiteniion span shows lha( dwelling on one ^lubject too long 
can actual!)' be worse IhaL nol long enough, Allhough you 
should attempt to include every detail, a short article that 
gets read is betier than a long one that doesn't. 

In general, articles should span no more than about 7 
lypewritlen pages including program listings. With so much 
material being released, long drawn-out programs rarely 
gel entered - potential error (publisher or during entry) and 
the fact that Ihey can be obtained from most user clubs, 
make them almost unworthy of publication. You have to 
admit, printing a program 15,000 times is somewhat waste- 
ful if only a handful of readers^ bother with it >Jatural]y, 
there will be programs of great value to many readers that 
deserve extra space, and they will be considered. But, as a 
nile, try to keep programs to 180 lines (3 pages) or less. 

On the other hand we have short articles and/or programs 
which nearly always get read. I can't help but read a one 
paragraph blurb regardless of the subject. Subroutines, short 
utilities, and especially "^one-liners" and novelty programs 
often i^ei entered merely because of the time it doesn\ lake. 
Further, errors are easy to spot and improvements are easily 
slipped in without mucking up some other pari of the 
program you may nol immediately notice. 



Make Me Laugh. Anytime, 

Are you an artist^ Or how ^bout a state-of-the-art come- 
dian? Or both? It you have a cartoon dealing with some 
aspect of computing, The Trarisactor will pay you for them! 
They can be single frames with captions, multi-frame with 
dialogue, or for anyone interested, a continuing series like 
"The Adventures of Rodney Ranibil, and Hisi Fearless Com- 
panion. Chip Silicon", We'll leave it up to your imagination, 
but it it's good for a laugh, it's good for cash! 



Each single frame with caption is worth $10. Send in three at 
once and get S40 Quality is important though. If your 
caption is one tliat'll "bring the house down" bui your 
arlwork makes it hard to avoid insulting yoii, well stin pay 
you lor them but at half the regular rate. We'll use the other 
half to pay a professional cartoonist, and both you and the 

artistwlllbecrediied.WhenThcTransaclorgrowsinsize^so 
will the cartoon section, hopefully to around 5 orfi pages full 
eadi issue 1 lliiiik you'll agree, there's nothing belter' than a 
good howl before getting down to business! 

We're still wurkiMg on al[ the details and a writers package 
will be available soon that will be sent to all our previous 
writers and anyone else on request. The packagt^ will in- 
clude a contract, technical specs (ie, for cartoon sizes), and a 
coupon good for a free subscription or renewal. If you have a 
submission ready now, send it in anyways and we'll use the 
blower lu get in touch. 

Perpetual improvement plan phase two now engaged! 




Sincerely, 




KarlJvfl.Hildon 
Edit 
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News BRK 



The Transactor loves Press Releases. 

Reference Issue Postponed 

in our lasr issiie (January 1 983) we announced that this issue 
would be llie Reference Issue coniainin^ handy charts and 
lables and other useful materia] oJ the kind that gels fre- 
quent perusal. However, we had hoped Ihat Commodore's 
new lliird Htneralion machines {the C and B/BX) would be 
released in time for us [o include Iheir memory maps, etc. 
Such was not the case so we've decided to hold off until this 
can be obtained. These and other new CBM machines are 
jusr about ready for market so the Reference Issue should be 
along soon (l&sue 04 or 05). 

One article planned for the Reference Issue was Don White's 
1 982 PET Bibliography, listing Commodore related material 
in oiher magazines published in 1982. To release this any 

later would be somewhat untimely so we've included il here 

in Issue 03. 



On The Local Scene. . . 

New Computer Oriented Book Store 
Opens in Toronto 

The Computer Book & Supply Centre. Toronto's first special- 
ized computer book retail store, held their Grand Opening 
Inarch 30. They carry a wide range of titles, from introduc- 



tory tutorials to advanced programming, and ihpy invite 
special orders for obscure, hard-lo-find publications. Al- 
ready they offer more than ^0 magazines plus otiicr com- 
puter supplies including disketles, printer paper and 
continuous forms/labels, prinlwheels, ribbons, and more. 

The Compufer Kook ASupply Centre 
253 Eglinton Avenue Wesi 
(south side, just cast of Averuc Road) 
416 4893625 

Open Mon-Sat - 10 am lo 6 pm 
Fri- 10 am lo 9 pm 



Computing NOW! 

From the publishers ETI (Electronics Today Int^i) comes a 
new magazine called Computing NOW!. The magazine 
deals with all brands of micros and other facets of the micro 
iiiUublry. 

Subscriptions are SI 8.95 with the option cancel at any time 
wiih refund uf unused ponion. Write to; 

Computing NOW 

25 Overlea Blvd. Unit 6 
Toronto. Ontario 
M4H9Z9 
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TVOverwhelming, 

Last season TVOnlario challenged Onlarians lo forgo iradi- 
lional passive viewing and get involved with a bold rew 
television experience - orie ilial cu[nbijied prim and elec- 
Ironic media. 

That challenge was met liead on! 

Ten thousand registrants (as many as TVO could accommo- 
date) irt the TVO Academy on Computers in EtJucalioR are 
now learning how to operate a computer, understand how it 
iunaions. and develop simple compuler programs in the 
comfort ol their own homes. 

To meet the overwhelming response and accommodate 
registrant overflow, TVO will repeat this step-by-step orien- 
tation course in microcomputers Monday and Tuesday 
nights at 8:00 pm EDT tor stx weeks beginning May 2. (the 
original course was 1 2 weeks lung on Wednesdays) 

The TVO Academy on Computers in Education consists of 
Bits and Bytes (a 12-parl TV series starring Biily Van and 
Lttba Goy). study guides, a variety of readings, multiple 

choice quesiionaires. personalized correspondence, loplcal 
newsletters, and contributions from a network of local 
experts. 

Each half-hour broadcast in Bits and Byte^ is followed by 
The Academy with Jock Livesiey: On Computers m 8:30 pm. 
Host Jack Uvesley's resident guest expert lor the series is 
none other than the ever present and well-kriLJwn writer, 
programmer, lecturer, sell-j/jprociatmed philosopher jet- 
-set world traveller, and The Transactor centerfold ol the 
year. , . Jim Butterfield, Super Guru. [\ just hadlo edit that 
partj. 

A fee of $59.00 gives a registrant a hands-on manual - a 
stand-alone aid for people with access to certain types of 
PET, Apple, or TRS-80 microcomputers - and several sam- 
ples of computer programs to guide them through the 
operation and use of a computer, (without the manual. 
133.00) 

Both hour-long Monday and Tjesday night presentations 
will be repeated [fie following Saturday beginning May 7 
from 2:30 to 4:30. 

Editor's Note 



I had the pleasure of attending a taping with Jim at TVO 
sludios in Toronto. Very impressed, Ttie coatenl is well 
thought out and the show gets the full treatment. TVO On i he set at TVO. 



research staff and other technical consultants for the show 
are present dunng taping [or any last minute details; control 
room technicians are well organized and precise; make-up 
staff are standing by just off camera; and the camera crew is 
bans on. Combined with the devoted stars of the show, 1 felt 
an atmosphere of genuine concern for quality. 

Of course, the show is not intended for veterans or even the 
moderately experienced user. But lor those just getting into 
micros and programming, it's an excellent start, 
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Events & Exhibitions 

Second Annual TPUG Conference 

The Toronto PET Users Group is holding Us second annual 
dub conference al the George Brown Casa Loma Campus in 
Toronlo (same localion as last year). Show dates are May 
14lh and 15th, Saturday (rom 11 am to 6:00 and Sunday 
from n Io^:30. 

Adi^ltiei ijiclude a disk copying niaralhun (1500- pro- 
grams) where attendees can leave blank disks al various 
copy slatiors and collect them al a later Time. Concurrent 
seiiiijidrs by iiiviled spt?akers sucli as Jini Strasma. Frank 
Covitz and Clifl AshcrafI on music. Willi Cusche on KMM 
Pascal, Greg Yob. Lome Wright (MICRO Magazine), and Jim 
BuLterlicid will hold a machine lani^uai^e wurksliop. Several 
exliibiEors of hardware, software, and accessories will be 
present, and a traders corner for used equipment will surely 
attract some attention. 

Last years conference was indeed a success, but now, with 

suiue accrued t^xperience, this years' event should be even 

more enjoyable. Your editor will be there, however, I don t 

knowyel if I'll be panicipaiing or just an observer. For more 
information contact: 

Chris Bennett 

TPUG Corresponding Secretary, 

381 Lawrence Avenue West 

Toronto. (;)nlario 

M5M 1B9 4167829252 

Editor's Nole 

The above number actually belongs to TPUG's new busi- 
ness office. Back in the winter of 78, TPUG held its first 
meeting in the basenienl patty njom of the condominium of 
founder Lyman Du^an - 22 people attended. Now with 
over 5000 members world wide. TPUG has full-time TOR- 
PET and business staff, a PR department, and regular 

business meetings where members are invited to attend. It 
shouldn't be long before executive elections are scheduled, 
but with everyone doini? such a fine job 1 can't imagine 
anyone being replaced, 

TPUG is [low ihe largest computer club in the world - yearly 
memberships are $30 for those attending regular meetings. 
S2\} lor students. Associate memberships are available lor 
those not attending meetings at $20, overseas $30. Great 
value for money. When submitting applications, TPUG asks 
that you include a Rrst AND last name, and postal code 
clearly identified, [same here. - Ed.] 



Firftt Annual Computer Fair 

The Computer Fair^ Canada's first national microcomputer 
show, is being held June 23rd to 26lh 1983 at the Interna- 
tional Center in Toronto. 

All facets of this rapidly developing industry will be present: 
designers, manufacturers, retailers, users, and more. Hard- 
ware, software and applications will be featured in both Ihe 
exhibit and seminar areas. 

In addition, for the first time in any computer show, educa- 
tion, training and career opportunities will be an integral 
feature. 

"Computer Career Opportunities" gives you the opportunity 
to present your institute to the public and encourage them to 
speak 10 your representatives face to lace, discuss curricu- 
lum, and obtain literature at)out your courses. 

An expected 50,000 visitors - business professionals, doc- 
tors, teachers, students, entrepreneurs, and generally inter- 
ested consumers - will attend the four-day event to absorb 
information, and capture the excitement of this new and 
quickly expanding Industry and potential job market. 

As space is limited, we advise you to reserve early. Already 
there are over 100 exhibitors registered, all in the micro 
field. 

Show hours are 10 am. to 10:30 pm, Thursday to Saturday, 

Sundav 11 to 6. Admission is $5, students and seniors £3. 
For more information, contact; 

Gail Park 

Computer Career Opportunities 
2282 Queen Street East 
Toronlo. Ontario 
M4E1G6 4I6 6909GCG 

Editor's Note 

I wouldn't miss this show for anything! It promises to be 
more compact than CCS and no wading ttirough tons of 
mainframes, photocopiers, and other junk. This is the fiisl of 
what looks like the most prospective annual micro show in 
Canada. For those outside Toronto, the International Center 
is right near the airport and there's lots of free parking and 
nighttime entertainment. Next year's fair Is slated for May. 



Tha Troniactar 



Aprit i^aa 



MidnUeXPrt^sa Cunference Sel For June 



menlaiy. secondari". and college levels. 



The MidniteXPress (formerly MidniteSoflwareGaiette/The 
PAPBR) is holding a week long Cuiiuiiodore computer 
conference at Lincoln College. Jim Butlcrfieid, Jim Slrasma, 
yours Iruly. and several other "famonsi" personalities will he 
there to conduct various seminars. 

Midnite would like to hear from those planning to attend 
that ca/i bring exEra equipinem. They're also offering a 
registration option thai includes a 20 or 64, For details: 

Midnite Conference 
1280 Richland Avenue 
Lincoln. IL 
62656 217 735 2703 



Among the participants are Jim Butterfield, David H. Ahl, 

Ludwifi Braun. Trudy Van Buskirk. Don Whilewood. Wes 

Graham, and aboul 60 others. Based on past conferences, 
attendance this year is expected around 2000. 

For a list of details write or call: 

Dr. Mitchell E. Balolf 

Director CE 'S3 

Institute for Professional Development 

2^5 Nassau Street, Suite D 

Princeton, NewJerse>' 

08540 609 924 8333 



Weterl(>o University Seiulnur/ Workshops 

WATSOFT Products Inc. has been trffering a variety of 
seminar/workshops including hardware design, interfacing 
techniques, structured programming and prc^ram design, 
machine language programming, and software portahility 
Cach workshop is 3 consecutive days of intensive siudy 
conducted by Waterloo Professors and/or research staff at U 
of W^s Computer Systems Group. The courses would be of 
particular interest to Computer Science. Malli. Business, and 
Technology teachers, but other professionals would mosE 

cenainly bei\ei\l 

The workshops continue throughout the year For informa- 
tion on schedules, fees, location, etc.. contact: 

Greg Garrison 
Seminar Co-ordinator 
WATSOFT Products Inc. 
1 58 University Avenue West 

Waterloo. Ontario 

N2L3E9 519^6 3700 

Telex 06 -955458 



Computers in Education '83 

CE '83 is the third annual conference and s'ummer institute 
for educators. Dates are June 20th through to July 15lh, 

1 983, at Rutgers - State University of New Jersey. 

This year's theme is "Necessary Direction for Computer 
Education: Navigational Aids for the 8UY', The tocus ol the 
conference centers on microcomputers and other [iew infor- 
mation technologies and their impact on education at ele 



TERC Summer Computer Seminars 

TERC (technical Education y?esearch Centers) announces 
its second annual Summer 1983 Workshop Series, Micro- 
computers in Education, to be held at the TERC offices in 
Cambridge. MA> These four-day workshops will provide 
intensive training in a variety of lopics for teachers and 
administrators at alt levels. 

The schedule for the summer series is: 



June 20-23 
July5-S 
July n -22 
July 25-28 
August 1-4 
AuiiustS-ll 
August 15-18 



Microcomputers in the Science Lab 

Software IDevelopment Workshop 

Special Summer Institute (see belouj 

Logo 

Simulations 

Pascal 

Logo 



The Summer Institute in Math. Science, and Computer 
Literacy will be held at Trinity College in the Green Moun- 
tains of Vermont. This workshop Is offered as a one or two 
week session. Topics include: 

Week1,JulylU15 

• Micros In Elementary Math & Science 

• Logo 

• BASIC 

• Computer Literacy & Awareness 

Week 2, July 19-22 

• Micros in Algebra & Geomerry 

• Micros in Trigonometry & Calculus 

• Math 8i Science Software Tools 

• Micros in Natural Sciences 

• Micros in the Physical Sciences 
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Morning and alternoon sessions offer maximum parricipant 
schedule Flexibilily. Erirollmenl is limited sa earJy resistra- 
lion is advised. Special outdoor activities in beautiful Ver- 
mont are available for spouses, children, and parlicipants. 
1 or more: 

TERC 

SEIiulSlreel 

Cambridge, MA 

UiliiiJ 617 547 3890 



light creating an atmosphere wilh greater visual comfort 
over lont? periods. 

The sleeves slip over florescent light tubes of any sizen By 
fining some bulbs wirh the sleeves and leaving others 
uncovered, virtually any lighting environmenl can be 
achieved. For more contact: 

Peri ph lex Inc. 

325 Milner Avenue Suite 409 
Scarborough. Ontario 
M1B2V7 4152923800 



1 he After market 



Compu^ierve Siibficription» 

CompuServe, one of North America's leadint^ larse-scale 
timefihare networks, is now selling access to the ser\ice 
through computer retailers and major retail chains. 

CIS (CompuServe /nformallon Service) can be used by all 
personal computers and most computer terminal. The 
service uffers shopping and banking at home, electronic 
mail, realtime communications, current and historical slock 
market and commodities information, news and weather 
reports, games, bulletin boards, private user groups, and 
remole computing capabilities. It even has an entire section 
devoted to Commodore users, accessed with the 'CBW' 
command. 

The CIS Starter Kit comes in a three- ring binder, with a liser 
ID number and password for five free hours of connect lime. 
A CIS User Guide, access instructions, glossary of computer 
terms, an introductory subscription to Today magazine, 
frequently asked questions and answers about CIS, and rale 
information are also included with the kit. Suggested retail 

price is S3y.y5- See your Commodore dealer or contact: 

CompuServe Inc, 

5000 Arlington Centre Blvd, 

Columbus, OH 

43220 GM 457 8600 



LCS Sleeves From Periphlex 

LCS [Ughl Control 5ys!em) Sleeves are a unique new prod- 
uct from Periphlex Inc. These sleeves are manufactured 
trom black nyton micro-monofi lament fibres woven in an 
extremely regular square weave pattern. The resulting col- 
umnaling grid provides perfectly square apertures through 
which light passe.s, The nylon libres absorb approximately 
5036 of the light. The result is reduced ^lare by reflected 



WATSOFT CAl Authoring Program 

Another product of WATSOFT Inc. is "^PETCAN" : a CAl 

authoring program designed to remove the programming 
aspect from writing CAl lessons, PETCAN prompts the 
author witti a series of cttoices and, with the answers to 
these choices, determines the structure of the lesson. It is a 
"user-friendly" program, designed so thai the computer 
novice is not overwhelmed, and the experienced author ts 
not bo^ed down with lengthy explanations and proce- 
dures. 

One of PETCAN's main features is complex answer check- 
ing through word comparisons, with up to eight possible 
comparisons for each question presented. User answers can 

be compared against anticipated correct OR incorrect re- 
sponses. 

Branching is another feature, allowing for flexible individu- 
alized lessons. Branching can be invoked based on periorm- 

ance, number of attempts, a specJIic answer {rigtit or wrong). 

and user controlled branching to allow the user forward or 
tackward movement through the lesson. 

PETCAN is available now for the 4032 and 8032. hidividual 
copies are $85. School Boards, etc., can obtain licensing for 
10 copies with 10 manuals for H85. For information: 

Sarah Wright 

University of Waterloo 

Language Laboratory Departmwit 

Waterloo, Ontario 

N2L3G1 519885 1211exl2735 
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Bullelin Board System Verflion 2.03 

April 83 marked the second birllitlay of Tlie PSI- WordPro 

Bulletin out of Mississaupa Ontario, Want to se( up a local 

bulletin Board ^System? Ur maybe you already havp. Kither 

way, Sieve Puiittr's latest version of tiis BBS software is now 
available. 

New features indude a revised 43 page manual, expanded 
user file records and facilities to edit and delcle user records, 
compresslo remove inactive users, system file editing Jacili- 
des, message forwarUiJig, furwaid and backward inessdiie 
reading, summary and overview from any message, list 
message from any user, time function, and private messages 
are now strictly private. 

As w^U new versions oJboltittielRRR and RS2:H2 versions 
of Steve's teriiiiEidJ programs dre included on the disk. Ttie^e 
are also available on the TPUG Communication Disk *2 for 
any user Itiat wishes a copy. Any AS(JI terminai program 
can be used to connect with the BBS, Likewise, Sieves 
software can be used to access any remote ASCII installa- 
tion, but only this program can be used tc tJp/Dnwnlnad 
programs from llie BBS. Dot: u mentation for ttie terminal 
software is contained within the BBS manual, and dealers 
are invited to copy this section for their customers. 

The BBS package is S200. Updates of the BBS software are 
no longer bemg handled t]y Commodore. Anyone wishing a 
copy of version 2.03 (ui later releases as tliey become 
available) should first find their proof of purchase and serial 

number, and contact: 

Steve Punter 
1343TynburnCres- 
Missiasauga, Ontario 
L4XIP6 



Law Office Accounling Software 

BPI Microsystems in consultation with the Law Society of 
Upper Canada have developed a law office accounting 
package ttiat contains a trust accounting system, general 
accounting sysiem, work in ptoyie^^ system, billings pay- 
roll, accounts receivable/payable, lime docketing, and will 
handle 3000 clients with over 5000 posting entries per 
month. 

The package tealures ease-of-use, minimal opeialor train- 
ing, owner and operator niijimalji with slep-by-step and 
set-up instructions, and password protection to prevent 
unauthorized records access. The operator is only required 



for data entry and the computer will ajtomatically perform 
many of the accounting and reporting functions without 
supervisiuii. For fnore info, contact: 



DfMig Marks 
BPI Microsystenjs Ud. 
705 Progress Drive Unit 1 7 
Srarbomngh, Ontario 
416 431 3200 
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Jot] CoaUng System 

The Job Costing System is designed to aid in managing Ihe 
cost of materials and labour, and controlling cosfs as they 
change. Features include (based or 8050 disk drive): 

• tracking arty type of job 

• unlimited number of jobs (using multiple disks) 

• up to 1 00 work categories per disk 

• budget to actual report 

• paid to accrued report 

• numeric or alphanumeric item listing 

• extensive error checking 
•minimal data entry 

• control totals and transaction listing 

• up to 1 jobs per disk with 500 budgeted items per jdj 

Available from all Commodore dealers, or contact Doug 
Marks at BPI (see previous item). 

Ontario Medical Package 

An efficient, powerful medical package that can handle 
virtually any Ontario practice with physicians in or out of 
OHIP. 

The .system can accommodate over 4000 patient records 
and tnaiiLidiji all peninetLt patient data including OhTIP 
number, status, and balance. The program supports over 
KM) codes for three fee schedules (OHIP, WCR, and OMA), 
handles basic and time units for assisting and anaesthesia, 
and handles premium charges. OHIP billing is completely 
aninmated, prints .12 and J8 lists, exception reports, and all 
ties directly iiiLo ibe accounling system to provide daily 
summaries, raontfily P&L statements, among other things. 

Other features include printing dally doctor and assistant 
schedules, keeping medical profiles on patients with aller- 
gies, continuing medication, an^l olher medical problems, 
and also details upcoming appointments and recalls, and 
outlines how much notice patients need if an appointment 
must he changed. Contact RPI for more info. 
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PAL For The Commodore 64 

PAL (Personal -Assembly Z^nguagc) for the C64, as well as 
CBM 8000 and 4000 series, is Brad Templeton's 
lull-fediured 6502 dsseiiibler. Usinij only 4K of memory, 
PAL source programs arc convenienlly entered jusl like 
BAMC; usi ng the slanriard BASIC editor and helper products 
like POWER cd[j be used. PAL works entirely in memory 
assembling programs to IK byles of machine code in under 
10 seconds. In addition to MOS standard assembler syntax, 
iEee^formal inpuL and lully formatted listings, PAL has 
special features for symbol reassignment, source file chain- 
ing for large programs, conditional assembly, saving and 

loading symbcrf tables from disk and user custoniization of 
operaiions, code output, listings and expression terms, 

PAL abo features a recursive expression evalulator wilh 
eight different operators and nine different operand formats 
including decimal, hex, and character. PAL produced pro- 
grams can be automatically relocated anywtiere in memory. 

PAL itself is relocatable and versions for the SOOO and 4000 
series can easily be burned into EPROMS for permanent 

installation. Several support programs are include that allow 
source files in otKer formats to t>e converted to PAL format, 
and an un-assembler ihat converts machine code files back 
to PAL source code. PAL comes on diskette complete with 
docu mentation. Price: $99.95 (documentation is excellent, 
like PAL- great buy -Ed.) For more, contact: 

V 

Pro-Line Software Ltd. 

755 Ttie Queensway East. Unit 8 

MissJssauga, Ontario 

L4Y 4C5 

416 273 6350 



SpeUPro: WordPro Spelling Checker 

The SpellPro spelling checker verifies the spelling of letters 
arxl documents at machme langu;ige speeds Designed by 
Jim Bulterfield for use wilti Commodore 8000 series com- 
puters with WordPro (C64 version due soon), SpcllPro's 
dictionary' is easily updateable to over SO.fXIO words on an 
8050 diikeUe. A custom dictiondry with legaL medical, or 
other specialized vocabulary is created by adding words 
Irom exisling WordPro with the touch of a key. 

Menu-driven and user friendly. SpellPro cnn be learned in 
less than 30 minutes, by rapidly eliminating misspellings, 
SpellPro greatly reduces clerical time spent on corrections, 
(not only that, but spelling checkers allow for carefree 
keyboarding - Ed.) (nformalion? Contact Pro-line above. 



MailPro 

MailPro, also known as WordPro MailList, is Steve Punter's 

exciting new multi-featured data-base like program for 

Commodore 8000 series computers. 

MailPro is user friendly and ideal for storing and printing 
mailing labels, club lists, personnel records, hobby lists, 
product descriptions, price lists, and so on. Files are easily 
user defined and updated. In fact. WordPro files can l>e used 
to automatically update MailPro iiles. and MailPro files can 
be used wilh WordPro to customize reports and letters. 

Primed output is completely user defineable and up to 10 
output formats can be stored for later use. Since records are 
maintained in a sorted condition, printing in any sequence 
is rapid wilh no sorting delays. 

On an 8050 disk. MailPro can store up to 2040 records per 
file with individual records containing up to 20 helds. Once 
again, call Fro-Lne for i[ifo. 



C64-Llnk Relocator 

The C64-Link form Richvale Telecommunications comes 
with d relocator program for moving the Link software (ie. 
the iniE roufines, BASIC 4.0 commands, etc.) into higher 
RAhA so that the uirlrkjge area f^M can be reclaimed- For 
certain programs (eg, WordPro 64), the relocator must be 
used to move the Link .software out of the way. 

It was discovered, however, that even after using the reloca- 
tor. WordPro 64 was still innperativp A new version of the 
relotaiur is now available that eliminates this problem. To 
get a copy, send $10 lor disk or $5 for tape, or phone 
Richvale with your Visa/Master Card number (see inside 
front cover). 



C64 Scratchpad, Basic Aid, Termsoft 

Scratchpad, the RTC free-formal data base like program, 
will be available for the Commodore G4 this summer. More 
details in a laler issue. Priced under 1 100, 

Richvale is also releasing a Terminal package for around $50 
and a hill fledged Basic Aid at $40. 
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C6i Management Accounting Software 



The Commander 



InfoDesifins has modified their8000 series accounting paclt- 
age for use on the Commodore 64. General Ledger, AR. AP. 
payroll, and invenloiy modules are all priced at $199 US 
eacli. 

Info Designs 

6905 Telegraph Road 

Bimiingham, Ml 

48010 3135404010 



C64 Fami Accounting Package 

Cyberia Inc. now offers (heir Cyber-Fanner package on the 
Commodore 64. Cytier-Farmer has been in use hy many 
farmers in the midwesl for over 2 years. Retail price is $1 95, 
available from Commodore dealers or dircclly from; 

CyLwrta lac. ■. 

2330 Lincoln Way 

Ames, (owa 

50010 515 292 7634 



C64 Programs from Computermat 

ComputerMat annojnces three new program paks for the 
Commodore 64, 



The Commander is a ^K ROM lor use with Commodore 

2000. 4000. and 8000 series microcomputers with BASIC 
4.0. It contains about 20 command?! for enhancing BASIC 
and program development. All commands can be used in 
programs or direct mode. 

Several commands allow for dynamic modification of BASIC 
text without destroying variable lablcs. These arc Insert, for 
inserting subroutines into text, Append, for appending code, 

and Delete, for removing lines. Each can specify a line 

numtjer following the command to continue execution dur- 
ing program runs. 

Print Using and Image are handy printer format commands. 
The Commander also has an enhanced keyboard GET. an 
array re-dimensioning command, string input up to 255 
characters, array (or matrix) input, output and manipulating 
utilities, and more. , . 

The Commander comes complete with ROM, manual, and 
demo disk for $70.00 When ordering please specify which 
socket ($A0O0 or $9000) the ROfvl will live at. and your disk 
unit type (ie. 40^0, 8050. etc). For details call: 



Commander Systems Inc. 
^1505 Jackson Street 
Hollywood, FL 
33021 305 962 5183 



^1 



The Arcade Pak Includes Alien Invasion with '20 play levels 
for I -4 players, Head-On pits you against ttie computer car 
in a maze race against time- Protect cities from destruction 
in Target Command. Cassette 524.95, disk V2995. 

The Game Pak includes Dragon Chase, a maze escape 
game. Flip-It, Itte compuler version of a 200 year old 
strata game [..could this be 'GO ' fur the 64? - Ed.], and 
Deflect, Cassette $15.95 

The Edu-Pak contains 4 programs. Ruler puts you in control 
of country tor as long as you last. Micro lets aspiring young 
entrepreneurs try their hand at ninning a computer manii- 
fdCturLug plant. Dungeon of Malhacos is a tuath prubletns 
treasure hunt game, and Geography lets you match cities 
around the US and the world. Cassette $24.95. For more 
contact: 



Commodore 64 COMAL 

In 1981 rOI^Af. (POMmnn 41gnritKmic /angu^) was 
created in DeEnnark tjy Bcrge Christensen for educational 
purposes. Since then the language has become popular 
world wide. COMAL combines the simplicity of BASIC with 
the powerful structures of PASCAL Features include; 

if-t hen-else-end if 

whiie-end while 

repeat-unlil 

case- w h e n-of h erwLse-endrase 

for-end for (next) 
loop-en dloop 

improved siring handling and 

file access 



Computer Mai 
POBoxl664-PR 
Lake Havasu^ AZ 
86403 602 8S5 ^3^7 



COMAI. checks the syntax of your program lines as they are 
entered and, in several cases, is much faster than BASIC. 
There's even a COMAL User Croup and newsletter. For 
more information, contact either: 



r 
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COMAL Inleresl Group 
505 ConkJin Place 
MddibUJi,WI, 53703 

The COMAL Catalyst (newslettpr) 
101 Convenlion Center Dr. Suite 900 
UsVegas.NV, 89109 

Several versions of COMAL e>iM. CBM 8096 COMAL and a 
version for the Madison Z-RAM board can be obtained from 
CiG (above). Instrutek, a company in Onmark, distributes a 
COMAL buird [hat fits yuur 8032. On power-up Ihe ma- 
chine is reconfigured to a "COMAL machine" (with BASIC 
available or command). Thf* bfwrrt also rombires hi-res 
graphics with iwo full virtual screens. 

Editor's Note 

Al last report COMAL QA is up and runnlrg and should be 
available on disk ^rid r^artridge by this summer, but no word 

on exaclddle&ur price. Rumuui lids iUhdl Coiiiniodore may 
include it on a utility disk with each C64/ 1 54 1 since COMAL 
ts public domain Miltware. I rerpivpd a rnpy of the new 
COMAL Handbook ($18.95 US from CIG) whicli looks very 
well done, (by the way, COMAL can be obtained on disk 
from QG for a $1 5 US handling fee. or .send 52^1*5 and get 
the disk and the liaiidLJouk) In my opinion. COMAL is Ihe 
first structured language one should learn, and The first 
high-level language young stiidenls should be instructed in. 
Musi uiiivetsilieb (rowti ujj Iht use of GOTOs and other 
simplistic, non-structured formats. Once someone learns a 
language like BANIC, it's easy lo get slnck in a rut that's 
potentially un-escapable. We'll be discussing the liistot>, 
concept, and direction of COMAL in an upcoming issue- 
Watch for it! 



Hardware fVews 

Memory Expansion For The C64 

No mistake, Richvale TeiecommunicaJiuns is developing a 
memory expansion board for the Commodore S^ for release 
sometinrip around July >1.S, The board ran be (itted with 
various amounts of memory and an optional 68000 cpu. 

Wilh the maximum memory configuration -512K-one can 
wrile BASIC pruyrams llial lill all 512K! A special BASIC is 
supplied that swaps out the resident BASIC in the 64. BASIC 
4,0 commands are included with rrne RASiC 4,0 garbagp 
collection! 

Another application is the RAM Disk. The entire rontents of 



afloppy are loaded into the expansion unit and subsequent 
file retrieval occurs at lightning speeds directly from RAM. 

No details on price, but wait 'till al least June before swamp- 
ing them with calls. 



Power-Line Protect ion 

Severe AC Powcr-Linc spikes, svirscs, and hash are preva- 
lent in many microcomputer installations. Program execu- 

tio[i is plagued with unexplained crashes, menwry loss, or 

other glitches. Disks, printers, and processor often interact, 
aggravating the problem 

Electronic Specialists recently announced Model ISO-1 1 is 
designed in prolect *;oftware from these severe electrical 
problems. Complementing the popular Super-isolator Une» 
tbe Model fSO-l I features two individually dual-n filtered 

+ 

AC socket banks (6 sockets total). Heavy-dury spike/surge 

suppression Is incorporaied in the design. Equipment inter- 
actions are eliminated, disruptive or damaging spikes and 
hash are controlled, and programs operate without interfer- 
ence. Price is 5115.95: 

Electronic Specialists 

171 South Main Street 

PO Box 389 

Natick, MA 

01760 617 655 1532 



C64 To RS232 Interface Cable 

Connecticut microcomputer Inc. introduces the ADA 6410. 
an interface cable for the Commodore 64 to RS232. 

The cable plugs into the RS232 Port (ie User Port) and 
provides voltage conversion to drive standard HS232 

printers, terminals, and mainframes. 
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The nnit i*irnniplete with six feel d cahip, and all Plpflmnirs 
are completely enclosed. Power is received fro[ii llie com- 
puter. There is no special software needed - secondary 
address *2 does the res(. 

Conneclicul microcomputer 
36 Del Mar Drive 
Brookfleld. CT 
06S04 203 775 4595 



BuckPuck Buttery Backup 

Backpack, a battery backup system for PET/CBMs and 

floppy disk drives, will prevent loss of data in the event of a 
power failure. BackPack supplies a minimnm of 1 5 minules 
reservepowerto32Kof memory, the video screen, and tape 
drive. Tfie unit is easily installed right inside the cabinet- 
Recharging occurs during normal pquipmeni tperalion and 
has an integral on/ off switch. 

From complete discharge, BackPack takes 16 hours to reach 
full charge, and has a life expeeianty of three to five years. 
Models are available for all dual dnve disks, 4000/8000 
series computers, and the C2N casselle deck. For further 
info: 

Jeff Butler . _ " . 

Electronic Technoloyy Corp. 

PO Box G 

Old NC 42 

Apex, N. Carolina 

27502 919 362 4200 



VIC 20/C61 Stringy Floppy 

Exatfuu hasaunuunced [heESF-20/64 String Floppy drive 
for use wiJh the VIC 20 or Commodore 64. The unit has a 
serial bus and connects tolhecomputer just asa 1541 disk 
drive would. The difference of course is the storage media; a 
miniature tape cartridge containing an endless loop of mag- 
netic tape. 

Features include rcliabililv, speed, compact size and com- 
patibility with software (ie. BASIC texr AND bASlC NOMs). 
The drive operates al 5 Inches of tape per secotid and has a 
capacity of up to 6^1 K per tape cartridge. Previously stored 
data is easily transferable Jo Ihe cartridges using simple 
BASIC comtnands. 

Retail price is aboul J 199. Additional tapes are about S'A 
each. For more: 



Rxatron 

181 Commercial Street 

Sunnyvale, CA 

94086 408 7:37 7111 

oulsideCAl 800 538 8559 




lEEE-488 Data Aquisition Module 

Conneclicul microcomputer announces a new 64 channel 
digital line input module for use with IEEE-488 bus compal 
ibleequipmenl.lt is the first product in Ihe BUSSter series of 
I/O modules. 

The BUSSter At)4 Uigilal Input Module accepts commands 
from any host computer through iis IEEE port, reads and 
store data from up to 6*1 digital TTL level lines and then 
sends this infornnation back to the computer, A BUSSter 
n^odule economically increases the interfacing capability 
while reducing its workload. 

The A64 is easily programmed through BASIC commands 
from the controlling computer. The built-in timer and bufler 

allow data samplmg and collection to occur while the hosi is 

occupied wilh other tasks. 

The BUSSter A64 sells for $495.00 including case and power 
supply. Further info available from: 



Joanne Akin 

Connecticut microCompuler 

36 Del Mar Drive 

Brookfleld. CT 

06804 203 775 4595 
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Commodore News 



Frpi- Prngram Pnck with 1541 Disk Drives 



VIC 20 Voted Computer of the Year 

Vancouver - An inWmaHonal conipetilion run by seven 
persona! computer mags has recently voted the VIC 20 

^ Home Computer of the Year'\ Judging was held in Undon. 
Rngland. 

Competition sponsors were Databus (Holland). Microsys- 
tems" (France). Bit (Italy), Fratliizal Computing (Eiii^land), 
Chip (Spain), Personal Computing (USA), and CHIP (Ger- 
many), Second and third place went to the Sinclair ZX81 and 
Speclrum. Runners up were Ihe Atari ^00 and tlie TRS 
Colour. 



1541 Disk Drive purchasers will now receive a Commodore 
64 program pack at no charge You gel a manual with short 
descriptions of over 30 pijblic domain programs jncludtng 
some games, sound/graphics demos, and utilities. 



C64 Programmers Reference Guide 

The Commodore 64 P.R.G. is now available (rom Commo- 
dore dealers. If you plan to do anything serious and haven't 
already got one, GET ONE! About 500 pages and great value 
for money. 



Coramodore and Zilog Announce Agreement 

(rving Gould, Chairman of the Board of Commodore Inter- 
national announced February :^nd that CBM had signed a 
definitive agreement witti Zilu^ Inc., anafflliateof the Exxon 
Corporation. 

'The agreement refers to an exchange of technolo4?y be- 
tween Commodore and Zilog, with Commodore licensed to 
manufacture Zilog's Z8000 16-bit microprocessor and re- 
lated family of peripheral support circuits for use in Commo- 
dore microcomputer systems, while Commodore will 
supply Zilog with mask sets and manufacturing rights to 
selected cuaorit circuits used in current and future Commo- 
dore microcomputer systems" , said Gould. 

"Commodore's financial business comnitment to Zilog is 
significant and involves a similar commitment by Zilog that 
could utilize a substantial portion oi Zilog's production 
fadliltesdevoted loihe manufacture of large scale integrated 
circuits for exclusive use in Commodore miaocomputer 
systems", he said. 

This agreement is intended to give CBM a substantial 
increase in semiconductor manufacturing capacity toward 
meeting its lar^ scale integrated circuit needs, while reduc- 
ing the time and investment required if Commodore were to 
expand its own semiconductor manufacturing capacity. 
"Notwithstanding this," Gould added, "our own semicon- 
ductor facilities' capacity is in the process of being increased 
100% as part of a program to be completed over the next 
twelvemonths/" 



Convert PET Programs to C64 Programs 

"Converting PET Programs for the Commodore 6^1" is a 
manual detailing potential software incompatibility prob- 
lems between the two machines. Most programs are porta- 
ble from the PET to the 64. but others will require major 
surgery. This of course refers to PEEK. POKE and WAIT 
statements, and SYS & USR commands which invariably 
indicate the presence of machine code. Topics covered 
include Upper/Lower case and graphics displays, output to 
the screen, clearing the keyboard buffer, disabling RUN/ 
STOP, and may more. See vour dealer for this and the 64 
PRO. 



New Commodore Colour MonitcH' 

Commodore 1701 Colour Monitors should be available from 
dealers now at J539.95 Cdn The unit has a 14" screen, 7 
different picture controls, and offers outstanding resolution, 
superb colour clarity, and a built-in speaker. Ii also has 
separate luminance and chroma inputs which make it a 
perfect companion for the 64. (I had a chance to see one at 
Commodore and even the reds and yellows come through 
clear - e^tceilent value $5:^9 Cdn. - Ed.) 



C64 Keyboard Update 

Paul Higginbottom of Commodore Canada is nearing com- 
pietionoi his keyboard synthesizer package for the C64. He 
says, "The keyboard unit will now have 49 keys (4 octaves], 
as opposed to 37 as originally planned. Also, the keyboard 
itself will house an 8K ' keyboard kernal" ROM. containing 
routines such as set a voice, clear a voice, set frequency, etc. 
The ROM will map into the normal cartridge slot area on 
power-up and nffer a standard jump table for those who 
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want to write their own software without a lot of rc-invcnt- 
mg the wheeL Full dociimenlalion of The ROM routines will 
be supplied/" 

[I've been following progress on this project since Paul 
began work gn iL For aboui $1800 Cdn, which includes a 
C64, the keyboard unit and cartridge (about $200 Cdn!), a 
monitor, and a disk drive, you ran have a stage-quality 
synthesizer ihat 5 virtudliy unlouchable. even by synthesiz- 
ers costing twice as much. I plan io gel one and I can't even 
play the sucker! - Ed.] 



New Commodore Piinterfl 

The 6400, 4023, and 1 526 are Commodore's latest additions 
to their printer line. 

The 6400 is a letter quality printer (daisy wheel) manufac- 
tured by TEC. This will replace Commodore's previous letter 
quality printer made by Diablo, the 8300R The 6400 has an 
IEEE interface and Is fully compatible with PET ASCIL 
Features include bi-direcfianai print, paper out switch, set 
top, set left, pilch control, underscore, bold and shadow 
print, reverse scrolling, and automatic hammer strike inten 
siry fderermined by the surface area of the character). Price 
around $2800. 

The 4023 replaces the 4022. Both are virtually the same 
printer, except this time Commodore's done it right. The 
4023 has an 8 by 8 dot matrix that will offer accurate 
representations of ever>' graphic character! Printing is tii-di- 
reclional - about 60 cps - with friction or tractor feed. 

The 1526 is exaaly the same printer, but with a serial 
interface compatible with the VIC 20 and Commodore 64. 
See your local dealer for details on price and availability. 



Commodore 64 LOGO and PILOT 

Commodore has contracted with the original authors of this 
favorite graphics language to put it on the Commodore 64. 
The adaption will be compiele and similar to ttip Apple 
LOCO, with extensions that take advantage u( iht 64's sprite 
g rap hi cs capabi 1 i t i es. 

Key features, graphics definition and movement, text dis- 
play, muhi-level graphic character display, complete screen 
editing, and comprehensive documentation, 

PILOT contains all the "Common PILOT" standard features, 
plus extensions. Most PILOT programs already available for 



other machines should run on this version wiili liiile or no 
modification Interface instructions are also included for 

connection to Video disk/tape players. 

Both languages are available from Commodore dealers for 

somewhere in the neighborhood ol S150 Cdn. 



Commodore Software News 



TBIS CA] Program Developer 

IBIS - interactive Basic Inslruttional Structure - is a newly 
released pn^gram that writes educational software in BASIC 

for Commodore computers [not unlike PETCAN see earlier 
note. Ed,] 

IBIS can reduce program development time by 10 to 2{) 
times because it allows people who may have no knowledge 
of BASIC to produce CAl lessons that run first time. One 

rather inieresling feature is that IBIS actually creates a 

BASIC program that can be modified using the BASIC 
Editor, 

IBIS runs on any Commodore computer with 32K and 
BASIC 4 0. If comes with a cassette port protection key and 

full documenlaiion. A Commodore 64 version is also being 
considered, 



Commodore Computer Educator Systems 

The Computer Educator Systems were designed to assist 
students at various grade levels by providing a fun and 
stimularing learning series to help them become more 

involved in education, however, many adults would also 
learn from these programs. 

Four main categories are covered: Science, Language, Social 

Science, and Mathematics. The Science series is aimed at 
grades 3 to tO with sections on elementary life sciences, and 
introductory physics and chemistry. The Language series 
deals with grammar, spelling, and vocabulary skills in En- 
glish and French. The Social Science series covers history 
(N. Amerkan, ancient, and middle ages), and world geogra- 
phy with emphasis on Canada and N. America. The Math 
series includes levels from grades I through II; simple 

arithmetic through algebra and geometry. 

Each section of each series come In packs of six l^>es with 

manuals for $69,95 per pack (suggested retail). See your 
dealer for details. 
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Commodore 64 "Eaay Software" 

The ^'Easy Software Series'^ available from CBM or previous 

product lines is now available for ihe 64. Among Ihe pro- 
grams in the series are: 

I 

Eaq^scriplS^ {word processor) 
EasyCalc64 {spreadsheet] 
EasyPlot64 (graphics plotter) 
^ EasyFilc6-1 (dala base) 

EasyMail64 (mail list) 
EasySchedule64 

EasyFinance64 



One last note. , , the ''C and "B^" series iiiadiiries wHI 
include a machine language monitor (which tends to sug- 
gesl righ! there that Ihe previously mentioned problem has 
indeed been eliminated). Tu make ruotn for the MLM, Ihe 
tape I/O routines had to be removed, but are provided lor 
Ihrough an internal vector. Simply st;^ted, the machines will 
come with a cassette deck port llidt ii iion- functional until 
extra software is loaded. This utility will be included with 
[he unit, however most users of either machine will proba- 
bly operate with disk drives. 



SX-100No*vSX-64 



All prot^rams come on 5 V* inch floppies with documenta- 
tion for each. For more information, contact any Commo- 
dore dealer * 



The SX-lfiO will now he known as the SX-6J. Recall, the 
5X-100 was the Commodore 64, a 1541 disk, and a 6 inch 
colour monitor. . . all in one box like the Osbourne I. Price 
is around SI 500 htit stifl no release date available. 



SkuttJeBits 

P128 Changed 1oC128 

For no apparem reason. Commodore has decided to change 
the name of the (as yet publicly unreleased) PI 28 machine 
to the "CI 2S" This is the low profile machine with numeric 
pad, 128K RAM. 6509 processor (which is NOT a 6809 
stereotype for those that noticed the part* similarity), and i^o 
screen. The "B" and *^BX" model numbers remain un- 
changed. 

Some industry eoncern has been expressed about the "pro- 
gramabilily ' of the C " and "B/BX" models in machine 
language. Both computers allow for scads of BASIC through 
an plahnrate system of bank-switching. However, machine 
language programs larger than a single bank might have 
trouble coping with themselves, (a rather strange slatemeni 
to make, I agree) At last report. Commodore will be includ- 
ing ROM code that will eliminate any potential problem, tiul 

here's the details that prompted the doutrt. 

It seems that 6509 architecture didn't allow for calling and 
returning from SLibroutincs that lived in other banks besides 
[he bank rnntaining the calling instruction. Think about it. If 
bank F(tor example) contains a call to a subrouline thai hves 
in bank I, bank 1 must firsi be switched in. Now ihe JSR 
instruction in bank F has been switched out. When the code 

in l)ank 1 comes to an RTS, execution musi somehow get 

back to bank F, information which is not normally stacked 
by the fiftO^i The kernal routines Ihat handle this situation 
are examined in detail by Jim Buiierheld next issue. 



New Approved Produetfl Program 

Commodore is aboul to complete an approved products 
policy that will govern ads placed in CBM publications (ie, 
Coininudore Magdzine and Power/Play), Specifically, ads 
submitted to either magazine won't be accepted unless the 
product is officially approved. Here's an excerpt from a 
pielirninary aimouiicemeiil: 

*\ , -We aren't enfornngthisparticular policy [Feb 11/ 
83| until the details of the program have been worked 
out, but we want to give you an idea of what is coming. 

The program will serve twlh our readerfs and our 
advertisers. Since many of our readers are new to the 
world of computing, and since the acceptance of ad5 
in a Commodore-sponsured puljlicdlion is a de facfo 
endorsement, we want to be sure of each product. 

More important, this effort represents a genuine com- 
mitment on Commodore's part to third-party ven- 
dors. Among the details heing discussed for the 
program dre findiitial and design assistance for adver- 
tising the products (in any magazine, not just our 
own), technical support and product testing, sf>ecial 
shows open to approved products only, and produc- 
tion of an approved products catalog for inclusion in 
Commodore's product packaging/' 

From the sound of things. Commodore has taken one more 

step towards getting their act together - a good sign. But I 

can't help cliutklijig over this additional bit of info thai came 
in with the same lot, . . 
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"Re: Using Commodore trademarks in your ads 

In order to prolecl the int^rity of our company's 
trademarks, we enforce the tollowmg trademark regu- 
lations for all advertising ia our user magazines: 

\ . All Commodore products mentioned by name must 

beareilher a ® or an® immediately following the first 
mention of the name. The present trademark status of 

our products is: 



PET® 
SuperPET® 



CBM® VIC 2D® 

Commodore 64@ 



2. Product names must be spelled correcliy. Please 

note that Ihe VIC 20 has a space but no hyptien and 

the Commodore 64 is called only that -not CBM 64 or 
C-64 or any such variation. 

Any ad that does not meet these requirements cannot 
be run in our magaaines. so please check over your 
ads carefully before sending them in." 

Point *2 is Ihe bit I'm referring to. I agree with this policy as 

(ar as ad content appearance is concerned - it provides for 

some form of continuity. But I always thought thai nick- 
names were a sign of popularity, something a manufacturer 
would naturally welcome. For example. I'm sure that 
"Chevy" was not invented by GM, Further, several after mar- 
ket vendors have already incorporated variations into their 
trade names (eg. C64-UnkV I'm sure Commodores intent 
was not to cause any discomfort, and besides, point "1 
technically exempts this situation because it does not actu- 
ally mention a pure Commodore product by name. No 

doubt, good judgement will be employed before policy- 
details are released. 

1 also hope Commodore won't object to authors using 
product name variations in published articles (the an- 
nouncement su^esis they won't). Referring to "ttie 20 ' and 
"the 64" is an easy way of breaking monotony. From now 
or 'The T will post Commodore trademark status on our 

own policy page. But typeseiiing those superscripted TMs 

or every occurence could get to be a royal pain in Ihe A 
register, I hope they won't mind if I omit them. 



I also hope they won't mind this next zinger, because let's 

face it. if we can't laugli at ourselves, who can we lauyh at. 
The following clippings were taken from recent Commodore 
information releases. 

COMMODORE SENDS UNIQUE CHRISTmS 
GREETINGS TO Cz 64 DEALERS 

Some of you probably think I should have put all this in an 
editorial- Bulwheuyou'reabiabberinouthlikenie, ediioriai 
space becomes somewhat precious. 

It looks like we're going lo have two sets of standard product 
names; one for advertisers and another for general logoma- 
chy and confabulation. Here's how I aflectionately rei*'r to 
my favorite microcomputers. . , 




The Max 




The 20 




The ^A 



I hope this doesn't catch up with me. . . trouble has a way of 
following me around. Besides, it'sall in good fun. 

Ar^d now. back to our program... 
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Kaleidoscope 

This program was dug up from the deprhs of my cassetTe 
tape collection. The prt^rom is about 4 years old so 1 dod't 
know who wrote it, allhoiigh I'd bedelightedlofindout. 



100 prim 'H": :t:=0 

1 1 for j =0 to 7 : read ch(j) : next 

120 data 160. 127, 102. 64, 91, 93, 58. 32 

130 5C = 32768. cols- 80 :[ines=25 

140nnx = in1(co/2-l):lc=li/co:ck = co-0.0001 

150 for li ^3 10 50 

1 GO for 1=1 to mx 

170forj=0tomx 
180k = i + i 

190c-chlG^3/(i-t-3)+i*h/l2)and7) 
200sl=sc + coMnt(lc-i) 

210s2^sc4co'inl(lc'k) 
220s3 = sc + coMnt(lc*(ck-i)) 
230 s4 = sc + co-intlk»(ck-k|) 
240 poke i -t- s2. c : poke co-i + s2, c 
250 poke i+s4.c: poke co-i + s4. c 
260 poke k + s3, c; pokeco-k4-s3, c 

270 poke k + sl,c: poke co-k + sl.c 
280 next j J, h 
290 goto 150 



The pm^din was modified to work on all Commodore 
DQachines so it doesn't make use of colour on the ViC and 
64. BdoreRUNning,change the variables in line ISOtosuii. 
SC is ilie screen siari address, the other two are rather 

obvious. 

To get colour wouldn'l be hard though. All you would need 
is another variable, say CT for Colour Table, sel equal lo it's 

slartaddrpw.Then just copy lines 200 to 270 inloalhhe "in 
beiwetJi" line numbers (ie. 205 - 275) and substitute CT for 
SC, C to CL, and CI lo C4 for SI lo S4, The variable CL is a 
cotour that would be generated randomly, or using another 

cryptic statement like line 1 90, Right now Jine 1 90 chooses a 

character from the CH array which is set up with Ihe screen 
poke values of 8 graphics. Change these il you wish, but 
likewise, another array (eg. CL(0-7)) could be set up to 
contain the poke values of some screen colours from wliich 
a new line 195 would select. Of course if line 195 were 
stereotyped from line 190, each character would get the 
same colour in all occurences. Try changing some Is dnd J's 
around. 

VIC 20 users and Commodore G4 users with Kernal 2 will 
need to add this line: 

C64: 105 poke 53281, 13 

V20 : 1 05 poke 36879. peek(36879) and 1 5 or 208 
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This changes the background colour so that the pokes to the 
screen will slinw up. With the 20 (and (J4 Kernal 2), a clear 
screen writes the whcle colour nybble table with the back- 
ground colour value. Thus a poke to the screen only puis a 
character in screen memory thafs the same colour as the 
background, making \i "invisible". This will be averted if 
simullaneous colour selection is added, however, changing 
the hflckgronnd colour dynamtraiJy mighl also he interesJ- 
ing. 

As is, the program's about as fast ds it's gonna t>e in BA.SIC. If 
you have a compile; dnd youVe ^ol rioliiiug belter lo da . . 
Finally, any dazzling new versions would be most welcome 

in a future issue! 



hinning If once, I lend lo save a direct load copy from the 
MLM. This way it can t)e loaded back using the monitor 
without disturbiEig the tuiUents of memory. 



4-0 Disk Append 

The pr<^Tam to follow is fairly self explanatory. 

10 print "basic 4.0 dibk append 

20 print "this routine will allow a subroutine 

3U pnnl " saved as a program file on disk to be 

40 print "appended lo a program in memory. " : print 

50 prinl ' the subroutine must begin with a line 

60 prinl ' number greater than the last line ol 

70 jjrijil " twsic text in memory " : print 

80 print ' activate with : '; 

90 read ad i rem replace with ad = ?^ for permanent place- 

ment 

1 00 for j = to 56 ; read x : poke ad -f j, x : next 

llOprint "sys" ad:chrH'i4) "hlename"^ chr$(34) ".S" 

120 rem routine is fully relocatable 
1 30 rem first data element is start address (ad) 
140 rem remove 1000 if ad is set within program 
1000 data G34 

1010 data 169, 0,133, 157, 32.125,244, 169 
1021) data 96, 133.21 1, 164. 209, :J08, 3. 76 
I030date 0J91, 32, 73,244, 32.165.244 
1040 data 32,210,240,165,211, 32, 67,241 
1050 data 32.192,241, 32,192,241. 56,165 
lOOOdala 42,233, 2,133,251.165, 43,233 
I070data 0.133,252, 32,140,243, 76. 28 
1080 data 244 

Lately I've had quite a bit of use for it. For example when 

you want to renumber only part of a program and don't have 

a selective renuETiber utility TirM you renumberthe part you 
want renumbered, then you bring in the rest with DiskAp- 

pend. 

The version above works on BASIC 4>0 only, however if 
thete^s enough demand we'll re-cut it for ihe other^i. After 



Crash Your Commodore 64! 

A dastardly perpetralion indeed for such a fine upstanding 
computer. But let's do il anyways (Nvdh ah ah). While 
looking for the problem with Ihe C64 POP SYS published 
last issue (see Ihe Transbloopors section this issue lor more] I 
stumbled across a most interesting crash, however it sceuis 
to only work on 64s with the racing stripes: 

poke 783, 8: sys 42622 

Now hit some number keys. That s it. . . keep gging. Neat 
eh? (Neat uii? for U.S. readers), A[id why is the text on Ihe 
screen (ie. from above) not disturbed by all the vertizontal 
scrolling? Hmm. fiventuaily it locks up completely bul no 
harm done Ju^l puwei duwa. up, and you're back to nurujdi 
(your machine that is). Any more out there? 



C64 TV Colour Adjust 

Don Lekei of VdEicuuver, B.C, has this useful iiule for Ihuse 
not satisfied with the colour output of their C64 to a televi- 
sion set- 

First power down your 64. C^en the casing and on the PC 
board, around the general vicinily of the Return key. you'll 
find a metal "Iwjt" (you can't miss it). Lift the lid off this lx)x, 
being careful not to wipe off that while gunk that's on the 
bottom of ttie lid and the top of that 40 pin chip This stuff 
Acts as a heat transfer fruju the chip lo the lid. 

Inside Ihe box are two while nylon adjustment pots. The one 
on the left is the Cbruina output adjust, anil lite one on the 
right is the Clock rale adjust. Turn your 64 back on and. of 
course, connect it to your '\y Before changing Ihese pnls, 
take a black fell pen and mark each one so you can return lo 
the original positions should you get carried away. Also, 
you'll need some stuff on ihe screen to make ihe adjustment 
by. Set a black background with POKE 53281,0 and type 
some lines of jibberish on the screen using the colours 
available from the keyboard (ie. CTRL - V. HT RRH, CYN. 
etc.). Once ihars set up you're ready for the intportdjil pan. 

Using a small .screwdriver {preferably plastic in case il gets 
dropped), turn the Chroma level down (counter-clockwise) 
until your TV just looses the colour signal. Ideally il will 
"flicker' between mtoiir and no colour. Now adjust Ihe 
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Clock pot so thai colour is regained and stable. This will be 

either a clockwjse or counler-clockwise liirn. but all it 

should need it just a "iweek", hjok yuod? Re-dsseriible llie 
machine, making sure the metal lid goes on the right way, 

and you're done. 

Of course you may not get it looking any better than it was. If 
so. you can always re-set both ad|uslments to their original 
posilioas. If your iiiat:lujte is still under warranty, you may 
want to take this note and your 6-1 down to your dealer aid 
have ihem do it. 



CKless CMD 

How many of you are making sequential listings of pro- 
grams to your disk drive? If you are. you probably do 
something like: 

open^. 8, 8. " 0: prog hie. s,w - 
cmd 8 : list 
print'8 : close 8 

This puts a listing to the disk just as if it were to the printor. 
You miiiht use this file at some later lime with a terminal 
program, etc But have you Jioticed an eAtracdrnage return 
always seems to creep in at the beginning of the file? If this 
bothers you. read on. If not. forget I mentioned it. 

The CMD command works somewhat like PRINT'. Without 
punctuation a CK gets sent afler\s'ards. In future. tr>' replac- 
ing the CMD 8 willi CMD 8,; This suppresses that extra 
preceding OR. And just a reminder, choosing a file number 
128 or greater causes a Line Feed to he sent alter earh 
Carriage Return. 

For some reason the comma cannot be omitt^. E)oe.s this 
surest there may be other Lumbinations? 



Sunny Side Up! 

It seems almost criminal what they're charging ff>r disketTes 
these days, Tlie material taii't cost mure than dbout a 
quarter, and they probably make about a thousand every 
minute. So what do we do? We cleverly hack out a notch nn 
the uppobile side of the jacket, flip them ovei, and presLu! 
One double sided diskette. 

But conader this. A diskette always spins in ojie direction, 
even double sided disks, which are not Intended to be 
Hipped but rather for use with double head drive unifs. 



When dirt and dust pariiclcs manage to land or the disk 
siirlace. the dnve spins it into the inner lining of the jacket. 
Usually it collects there and doesn't bother us too much. If 
Ihedisk is flipped over, rotation will now be in the opposite 
direction. All that cnid will now be released from the lining 
on twth sides of your disk. YUK! 

I hope Tm not sounding like a diskette s^ilesman. I *iuppose 
we just have to put up witli prices until enough competition 
brings them down. . . kind of a "fad of dalalifc" (ooh, poor). 

This lip and others will be published in an all encompassing 

general care article planned for a later issue. We're still 
collecting more so if you have any helpful advice for others, 
send it in and we'll be sure to include iL 



Wa*te Space 

The fallowing is for those who like iodine your variables 
dt ttiebegjimint^uf aproftram. If you're the type that lets all 
your variables be defined as execution sees them, you could 
be in for s{»me peculiar results. 

When BASIC "sees" a variable, the variable name and 
information related to it gets ?iluffed into the simple varia- 
bles table that sits ini mediately atiove your program text. 
Each new variable seen causes the table to grow by 7 bytes, 
which cannot be reclaimed short of doing a CI.R. But only 
floating point variables tnake use of all 7 bytes. StrJn)^ 
variables use only the first 5, the last 2 are wasted, and 
integer variables use only the first 4 MiernSoftdid it this way 
to reduce ROI^ code and also to make searching through the 
table a little quicker. 

{ duiVi sj^i^est you actually try to use these bytes unless 
youVc seriously strapped for memory and another 7 bytes to 
storesomevalueisabsolutelyunaffordable. This was meant 
more as a refrestier on the simple variables table than 
anything else. However if you do need these bytes, here's 

how to go about it. 

First you MUST define some variables at the start of your 
listing That you will be using later on These variables must 
be either siring or integer type, but depending on how many 
you choosetopre-definewill decide how much waste space 
you'll have to play with later If you're using .l,R/s String 
Tiling, stop riphi here. Jim uses the last two bytes of the first 
variable definition, and assumes these will start with 0. 
Warrh out for ihis with some other utilities too. 



TheTr 



ict*r 



M 



Aprn i9aa 



Moving Strings 

To demonstrate the above. I borrowo*j pari of a "function 
input" idea [ was tos^ng armind, ,, more on thai in a 

minute. 



Top of AtTay*i Pointf*r nin*Jt bp set lower than the Bottom of 
Slriiitis puinier so Itial garbaije collection is not invoked 
which would ruin everything. Line 1060 merely causes AS 
to be transferred to the BASIC input buffer, and lire 1070 
marks liie end of valid buffer contents witli a 0. 



Line 1 00 defines some variables. As yon can Siee. we'll only 
be able lo use the waste space from AS and B%; the third 
lable entry. C, must not be disturbed! 

To save space, the poke/peek address is calculated in a 
function. PN AD takes the address stored in Ihc Start of 
Variables pointer and adds Y to it (equivalent of "indirect 

indexed^" in machine code), 

l[)Oa$="" :b% = 0:c = 3.3 

1 1 def fn ad{y) =y -h peek(42) + peek(43)-256 

.^00 input " some function " ;fuS 

510aS-fu5 

520gosubiaOO 

530 rem go lo plot routine, etc. - 

1000 poke fnad(5). peek(48) 

10]0pokefnad(6K peeM'lS) 

1020 ptjke 48. pt^k(fnad(2))"l 

1030 poke 49, 2 

1040 poke fnad{12).peek(47) 

10S0poke47, 1 

1060a$ = a$ 

1070 poke 2*256 -f peek(mad(2)), :remO marks bufr end 

1080 poke 47, peek{fnad(12)) :reni rt^Mure Tup of Arys 

!090 poke 48, pcck(fnad(5)) :reni restore string 

1 100 poke 49, peek(fnad(6)) :rem boi pointer 

lll0a$='^ rremnullaS 

1 1 20 rem sys to tokeiiize routine, and/or cval expression 

1130 return 

Line500inputsFUS(sorTy about nny choice of variables but 

FN$ would cause VSyntax error, and you have to admit, it 
probably wouldn't he used elsewhere). FUt is transferred to 

A$ because A$ must be nulled later on. 

Wilh a Y argument of 5, the result of FN AD is the elective 
address at which wc store the Bottom ofStrings pointer. To 
store info in B% wastespace.simpiypassal2(5+7,and 13, 
6+7)loFNAD. 

Now the String Move part. Lines 1U20 and 1030 aller the 
BoltomofStrini^spoinler topoint at the BASIC input buffer. 
The buffer starts at $0200 [dec 512), but the pointer is set to 
102tiO plus the length of AS. which we get from HKKK KN 
AD(2) (note; this belter nol be >80), Before AS is rebuill, the 



:rem save bottom of 
:rem strings pointer 
:rem move pointer lo 
;rem basic input bufr 
:rem save Top of Arrys 
:rem move pointer below 

:rem $0200 & rebuild a$ 



After mending all the assaulted pointers, again using FN AD 
to access values stored in waste space, A$ is set lo null so 
ttial garbage collection doesn't clobber anything important 
down in lower memory. Continuing, the program might 
continue to use the conlenls of the input buffer Specifically, 
the string could be tokenized and evaluated for use with a 
plotter subroutine, trigonometry program, etc. 

I haven't actually tested this, but the idea was to demon- 
strate using waste space. For one thing, the contents ol the 
B.\51C inpuT buffer may require a conversion lo screen 
codes before tokenij;ation is called. For another, the buffer 
itself may get clobbered by subsequent BASIC operations 
pe. POKE, FN, SYS, etc.)- If suineone decides to tackle the 
"function input" uliiity. it may require machine code for 
everything past the input statement. However, I'd be most 
interesied in ANY results! 



Butte rware 

The next three programs are from who else but .lim Butter- 
field. Tfie first is String Thing 64, the secoiid is Tapeniaker 
for B/\SIC 1.0, and the third is Universal Disk Change. 

String Thinjj 64 is the Commodore 64 vetsiun uf Universal 
Siring Thing, published in Transactor 01, Volume 4. This 
Uliiity will input .strings from the disk np to 255 characters in 
lenyth, tenniiiatiiigoEily on carriage reiurEi. . . handy when 
commas and colons \n files arc intcrlering with input. 
Remember, the variable that receives the input must be the 
first one defined in the simple variables table. Also, the file 
number used to open the input file must be number 1 . (ie, 
OPEN 1, a etc.) 

Siring Thing has other interesting applications. The test for 
CRcanbechanged to virtually any character (see Catstrapo- 
lalor this issue). Input is also controlled by the length of the 
buffer string (AS below). If lines 110 and 120 arc removed, 
inpul will be throttled to 15 characters maximum (len(aS)). 
L-ocatlon 142 stores the number of characters received from 
the most recent input (note lires 130, 440). 

I can't be sure, but a quick look at ihe machine language part 
indicates that it will ^'ork on the VIC 20 without modihca- 
tion. 
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100brj=l to 348 : rcadx : ch^ch-^x; next 


60 rem '* .sJnng thing M •• 


I10ifch<>32a53 then stop 


70 rem »• ' jim buuerfidd ■• 


I20open8.8.8, ■®0:tapemaker4.0.p,w 


80 rem ••■'*■•'**»*•*•***•*■•*'-••**•»-• 


1 30 restore : for i = 1 to 348 : read x 


yo rem input string musi be first variable 


140 print's, chrt(x); : next : close 8 : end 


100a$= 'abcdefghiiklmnopq' 


1 50 data 1 . 4 


nOa$ = aS ha$ + aS4-a$ + aS 


160 data 44, 4,100, 0,153, 32, 34, 84 


120aS = aS4aS + aS 


170 data 65. 80, 69. 77, 65. 75. 69. 82 


1 30 rem above sets string for max (255) 


I80daia 32. 32, 32. 32. 32, 32. 32, 32 


_^200datal60, 2J77, 15,153.137. 0,200 


100 data 32. 32, 74, 73, 77, 32. 66, 85 


2U)clatal9:i, 6.208. :246, 162, 1. 32,198 


200 data 84. 84, 69. 82. 70, 73. 69, 76 


220dala255, 32,228.255,201. 13,240, 15 


210data 68. 34, 0, 64, 4,110. 0.160 


230 data 164. 142. 145.140,200,132, 142, 196 


220 data 49, 58,159. 32, 49. 44. 56. 44 


240 data 1 39. 240. 4,165, 144,240,234. 76 


230 data 49. 53, 44, 34, 73. 34. 0, 98 


250 data 204. 255 


240daia 4.120. 0.160, 50. 58,133. 34 


260 for j = 896(0 937: read x:ch-ch + x 


250 data 78, 65. 77. 69, 32. 79. 70. 32 


270 poke j, X : next j 


260 data 70, 73. 76. 69. 32. 79, 78. 32 


2^0 \\ dioei 20 ttjen stop 300 stop 


270 data 68, 73, 83. 75. 34. 59. 78. 36 


400 open 1,8.2. "file" 


280dala 0,117, 4.130, 0.159, 50. 44 


410 rem next sys same as 'input* l.a$' 


290data 56, 44, 51. 44. 78, 36,170, 34 


420 syb 896 


300data 44, 80. 34, 0.144, 4,140, 


425 rem 1 = size of input (could be 0) 


310datal32, 49. 44, 69. 44, 69. 36. 5S 


430l^peek(M2) 


320datal39, 69,179,177, 48.167,153. 69 


440 prim ]efl$(a£,l) 


330dafa 36, 58.137, 49. 49. 48, 0,166 


'150ifsr = 0golo420 


340dala 4.150. 0,133. 32, 34, 80, 69 


460 dose 1 


350 data 84, 32, 79, 82. 32. 86, 73, 67 


■ 


360data 34, 59, 86, 36, 0. 192, 4,160 




370data 0,151. 56, 50. 54, 44, 49, 58 


Tapemaker 


380datal39, 198, 40, 86. 36. 41,178, 56 




390data 48,137. 32, 49, 56. 48, 0.219 


Tape malier will accurately meke a tape from any PRG file on 


400data 4,170, 0,151, 56, 50, 54. 44 


disk Now you might say, " but all [ have to do is DLOAD 


410data 51, 58,139,198, 40, 86, 36. 41 


itie program and SAVE it on tape for ttie same results". Not 


420datal79, 177. 56, 54.137, 32, 49, 53 


sol No! all programs load to the start of BASIC text space. 


430data 48, 0.229. 4.180. 0,158, 49 


Some load to ttie cassette buffer and others load above the 


440data 50, 54, 53, 0.239. 4,190, 


start of BASIC- Tapemaker will handle these corredly. 


450datal6a 50. 58,160. 49, 0, 0, 




4C0datal62, 2, 32,198.255, 32,228,255 


And there's morel Tapemaker will also make tapes of PRG 


470 data 133, 251, 133, 201. 32, 228, 255, 133 


files that start above address J8000. The tape roulmes in 


480data252. 133,202, 169. 98. 162, 5, 133 


ROM don't alow this, even ifyou use the machine lani^upige 


490data 90,134, 91, 32.228.255,160, 


monitor. Now you ask. ". .what would 1 possibly want to 


500datal45, 90,230, 90.208. 2,230. 91 


save on tape hat lies atxjve tiex 80OO ?". 


SlOdata 230. 201,208, 2.230,202,165,150 




520 data 240, 233, 32,204,255,160, 0.132 


Tapemaker is EXTREMELY position dependent. One too 


530 data 150, 200, 132.212,200, 177, 42,133 


many or too few spaces and whammo! So in order to publish 


540 data 209, 200, 177. 42.133,218,200,177 


it and eliminate any potential for entry error, we've taken 


550data 42,133,219, 32.149,246, 32.140 


theentireprc^ramandput it in DATA statements. Since you 


560 data 248, 173. 58, 3, 32, 25,245.169 


need a disk drive to use Tapemaker the two listings that 


570data 98, 162, 5,133.251, 134.252.165 


follow actually generate a new program on your disk. In fact. 


SSOdatd 90,133,201,165. 91,133.202, 76 


don't wasie time making them too pretty. . once the listing 


590 data 206, 248 


has been entered and RUN. you can discard it. . .you won't 




need it again. 


Nuw LOAD Tapemaker using tfie appropriate file name. A 




UST will show you the BASIC part but beyond this is a 
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whole mfjv-; of marhine language. DO NOT make changes. 
Akeriny the BASIC code will shift the machine language and 
ihe SYS command will probably crash your computer 
Changing the SYS command won't help either 'cause the 
mdcliijie code is position dependent too! 

When Tapemaker is run, Ir will prompt for the filename oi 
the protfram you wish lo make a tape of, and then ii asks 
"pet or vic?'\ This refers to the name you just entered, not 
the machine it will be loaded into. That is, if you're making a 
tape oTa PET prograin, euler p'. Enter "v" if the filename you 
entered belongs lo a VIC or 64 program, OR if you want the 
t^>e to be a "direct load" file such as with machine language 
programs. Then sifiiply follow the instructions Co come. 



Drive I, Are Vou There? 

Single disk drives have one very distinguishing characteris- 
tic; there's no drive I \ If you want to test this from within a 
program, here's a simple procedure. Open the command 
channel and send an II (initialize drive I). Upon reading the 
error channel, the error returned will either be for OK, or 
21 for read error This suggests there IS a drive \. but there 
may or may not be a disk mounted. If a single drive is 
connected, the error will be 74, drive not ready. 

This tip courtesy of Greg Beaumont at RTC. You might want 
to include this with the Calstrapolator uliljt>- later this issue. 



Universal Disk Ctiange 

Disk Change allows you to temporarily change the device 
number of any Commodore disk unit; 2040, 4040, 2031, 
8050. 8250 J 540. and 1511. 

100ddtdl2,50, 119, 

1 10 input ' old device number"' ;do 

12(hfdo<8ordo>l5thenl]0 

150 input "new device number'idn 

160ifdn<8ordn>15thenl50 

200 open 15. do. 15 :rem command channel 

210a$ = chr$(do+32):bS = chr$(tlo-i-64) 

220 read a : if a = then print "disk not rccc^nized!" : 

goto3I0 
230print*15. ■m-r"dirS(dKhrI(0) . get'lS, xS : if x$<>a$ 

goto 220 
240 print'15. ■m-r'chr$(a+ l)chrS(U) : get'lS. xS : if 

xS<>b$ goto 220 
SOOprint'lS, " m-w"chT$(a)chrS{0)chrH2KhrS(dn . 32)ch- 

rStdn-r64) 
310cbsel5 

To get your umt back to the original device number (usually 
8) simply power down. Or you can send this to Lhe com- 
mand channel: 

print'15, 'u:' 

In a future issue we'll be publishing instructions for a switch 
that will add pre-power-up device number selection (ie. 8 
or 9). 



SuperPET Bits 

How many bits in a SuperPEF Seems like a silly question, 
doesn't it. Well, it is. Theanswerwill be sure to impress your 
friends though. . . we'll have it here nexJ issue, but you may 
want to add it up just for fun. 

Just one preliminary note, , . Waterloo now has the 6502 
Assembler available for the SPET. No word on price, call 
Waterloo. 

The rest of our Bits and Pieces comes Irom the Computer 
Systems Group at Waterloo. Many thanks for permission lo 
reprint. 



Index Expressions in APL 

An error in the evaluate ohhe individual componenCsofan 
index expression cac cause errors or incorrect results when 
using WLU microAPL with a fragmented workspatc. The 
probleraexistsonly with Version 1.1. The expression evalu- 
ates i[icorreclly when a garbage collection occurs during the 
evaluation. The likelihood of this happening can be reduced 
by forcing a garble collect (eg. M L D WA| from time to 
time. The problem will never occur if the individual expres- 
sions are assigned to variables prior lo performing the index 
operation. For example: 



chants to: 



x--a[Ul ;2 + 2] 

al*-| + l 

a2^2^2 
x*-a[al :a2| 
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Form Feeds and SuperPET Printer Output 

Norjiially d Supt^rPET prijiler h dedicated to the SPET lo 
which il is connectedJl is uplo the person using It to ensure 
that the printer is pcsitioned to the start of a page ht^fore 
priiUing a listing. If ihe printer is connected to several 
SuperPETs through a device such as a MUPET. it can be 
sliared by mnre than nne person It ran even he phy^^ically 
distant from one or more of tlie micros lo whicti it is 
connected, and adjusting the printer before producing a 
listing can be rattier cumbersome. In response tc requests 
from SPET ii*>ers who wish to share priiUerb, llie following 
program was written: 



output 



O10upen*2, 'f[palch,prg'', 
020 loop O30 readi 
040 if i = 999 then quit 
050 prim -2, chr$(i); 
060 endloop 070 close '2 
080data 5, 192. I), 41, 
090daldl34. a 183. 5, 
too data 50. 57, 5,202, 
IHJc]ala23(J, 2. 19;i VM). 
I20data204. 0, 96, 52, 
l30dalalO0J89, 192, IH, 
140 data 1:^.237,228.2:^6, 
150data2tl, t23, 50, 98, 
leOdata 0, 0, 0. 2, 



The program is run ojily once- It creates a di:>k file called 
"ffpatch" (form feed patch). The patch program is run from 

ttie SPETs mam menu by entering "diskJfpatch" when the 



0, 





149. 


15 


IT'I, 


98 


:*». 
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6, 


236 


204, 





10(1, 


189 


57, 





0,999 



SPET is turned on, or whenever a switch from G\ 

mode is made When it has completed tfie program returns 

10 the menu- The program applies a patch lo the system 

routine called (3ECL0SE_ so that a FormFeed character is 
output whenever a printer file is closed. This will prevent 
printer output from more than one source trom appearing 

on any single sheet. 



Simulating a GET in PASCAL 

The program tjelow simulates a BASIC GET statement to 

read a character from the l^eyboard: 

program main ( input , output ); 
var 

c : char; 

lo: file of char; - 

lx;gin 
writein ( Characlerr ); 

reset (io. keyboard); 
c: =chr(0): 
while{c = chr(0))do 
read ( io , c ); 

writein { 'Character = "" ',c/ ' ' ); 
end- 

Unlil a key is hit, ihcrcad statement returns a null value in 
the variable C. When a non-null value is returned, the 

whiie-loop is terminated and the character is displayed by 

the second writctn statement. The character entered is not 
echoed directly on the screen when it is typed. 




I 
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CompuKinks 




You shouldn't have rear-ended that guy like 

that. 





It was a program I found in The Transactor. 
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Transbloopors 



This section, ofthotigh hopphiify not regular, ivili cover 
publication errors and/or Improvements for articles in pre- 
uious Transactors, ff you Hnd a significant mistake in our 
mag, /^pose let us know so u)p cart pass it on. Ed. 



C64 To PET/CBM 



Vol4Us2Pgl2. Biigz 



Missing link! The 6 step procedure for loading a CG4 pro- 
gram into a PET needs one extra slep. Il seems that when 
line is deleted {siep 5)the PET doesn^t rhink that the size of 

ANY line could possibly be over 255 bytes. Therefore, tlie 
high order byte of the End-of-BASIC pointer is not adjusted 
properly, A SAVE at ittis poem would store an extra IK of 
waste. To fix it, add step 5.5: 

5.5poke43.peek(43)-4:clr 

This will adjust the End-of-BASIC pointer and the CLR 
cleans up any other pointers. 



Stack (Crackle) Pi>p 



Vol4ls92Pgl3, 



Fooled! The C64 and VIC 20 SYS commands to simulate a 

POP, don^t work. At first, the C64 SYS appearing to be 
working, but on further testing It was fubar. I didn't have a 
VIC 20 a[ Itie lime and just assumed it would be the same 
plus SI92, but of course this didn't work either. The BASIC 
1 .0, 2.0, and 4.0 SYS calls are correct. 

Using the SVSs from the earlier BASICs, I compared disdb- 
semblies and found (he equivalent C64 and VIC 20 ROM 
code lies at: 

64: sys 42622 ($a67e) 
20:sys508l4($c67e) 
Note: diflereiice ib 8192 ($2000) 

But for some reason these don't work either. Argh! The 
results appear the same as RUN/STOP - RESTORE. I exdin- 
ined the code that performs SYS and although it's different 
than m earlier machineSn it all looks preUy straightforward 
But no go- Would someone like to take a stab at this and let 

me know what's happening? The code for SYS starts at El 2A 
in the 64, and EI27m the 20. 



Vol4 [ss2 Pgl9. 



Retraction! 1540 and 1 541 diskeiles ARE write interchange- 
able. The compatibility problem lies in the drive itself, "High 
prolile" drives are not compatlhle with "low prnMle" drives 
When the new 40405 and 2031s come out witJi low profile 
drives, they'll all be write compatible. 



Bugz 



Vol41fts2Pg2L 



Misquoted! It was actually Hon Lekei of North Vancouver BC 
that found the fix to ttie renouned C64 screen editor crash, 
Thanji Don, 



Delermlnfng Screen Size 



Vo14 1ss2 Pg37, 



Typesetter glitch! Tliose upside-down exclamation marks 
should be ' = ' signs and the double plus signs should be 
single plus signs. Most of those familiar with source code 
istings will have caught this error. 



Power/ Error Indicator 



Vol4]ss2P841. 



?art numher mix-ups! The IC in the .schematic is an 

3N 7404. not 7400. The Radio Slack part number below it is 
correct. Also, The RS part number for the LED belongs lo the 
buzzer, and vice-versa. 



Cf>4 Piano/Organ 



Vol4Iss2Pg5I. 



Typesetter glitch! At the end of line 193, co = 2 t (1/12), 
Similarly, at the end of line 200. a(!) = 2 t i. 



Cfi4 Joystick Porta 



Vol4ls>2Pg€l 



Line 63040 should read: 

6:^040 a = 25S-peek(na) : b = 255-peek(cia + 1) 
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The WordPro 
Book Of Tricks 



Donna Green 

Commodore Canada 



WordPro and The Commodore 64 



Commodore Business Machines has recently announced 
the availability of WordPro for the Commodore 64 com- 
pulcr. This is the same famous program that runs on the 
4032 (40 column) computer and therefore has almost the 
same name: "WordPro 3 Plus for the 64'\ For those of you 
who may recently have purchased this program, which is 
available from all Commodore dealers, we will explain here 
the differences between this version and WordPro 4 Plus, 
Ihe program usually discussed in (his column. 

WordPro 3 Plus is basically the same as WordPro 4 Plus, It 
includes all the various editing functions with the exception 
of *butpul to video'' - with the 40 column screen, this 
feature is not praakal. The Numeric Mode in WordPro 3 
Plus also differs slightly from 4 Plus. 



Ovcrviciv 

This Professional Software program. Is packaged as usual 
with an excellent reference manual, and one copy-pro- 
lecled disk. (It is not possible lo cc^y and run this prc^ram 
disk.) You'll find that nearly all the WordPro commands are 

still the same. If you already know WordPro 3 (or 3 Plus) or 
WordPro 4 (or 4 Plus) you will only have to become familiar 
with the dIfferenT keyboard to use this pro<?ram. 



There are a total of 329 lines available for main text with a 
minimum of 176. Together with Ihe extra text area, which 
hasaminimumof 23 lines, there is a grand total of 352 lines 
available on this 64 version. (Although the manual still 

recommends that this maximum number of lines be en- 
tered, I still recommend that 180 or 20O lines be entered to 
aflow for more space in the extra text area. Another reason 
for selecting fewer lines, is that with WordPro 3 Plus and 
WordPro 4 Plus files being completely compatible - except 
for the length of text available, there is the potential problem 

of WordPro 4 Plus not being able to recall an entire 3 Plus 
file.) 



Loading The Program 

This program written for the Commodore 64 generally uses' 
1541 disk drive and a I52SE matrix printer. Other disk 
drives and other printers, however, may be used if a 
"C64-Link" is attached. The program is loaded with the 
command load '*'£. (This obviously differs from the 
"Shift/Run* command for WordPro 4 Plus.) The series of 
questions that come to the screen should be answered 

individually, rather than pressing 'Control" lo default 
through all the selections. If a IS25E printer is attached, 
select "o" for Other, and "c" for CBM. 
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Other Printers And Disks 



The C64 Kf-yboard 



As many "64-o\^ners*' are aware, or as anyone wiM nolicc 
from advertisements in The Transactor, there is an atTa<rh- 
menr available called ihe "C64-Lirik ' iliai will allow for 
oiher disk drives and printers to be connected to the com- 
puier. This means, that any compatible IBEE and parallel 
prinleis, as well as all disk drives can now be used with 
WordPro 3 Plus. Por example. WordPro 3 Plus can success- 
fully operate with an 8050 disk drive and ar 8:i()0P letter 
qualil> pr infer (Diablo)! 

In order to run WordPro 3 -f with tfie C^-^l-Unk. the "Link 
Relocalof program thai i^ornes willi Ibe C64-Lirik rnusl first 
be loaded. This will bnng (o Ihe screen a 5-ilem menu ll is 

then required to cursor down to the 5th item enblled '*No 
Ram and Flipping" and to press return. 

Three more selections must then be made. First ihe screen 
will display "Disk CoEifiguralion" with ihe selection lo be 
made of either "Serial' or 'IEEE". "Printer Con fig ural ion" 
nextolJerslhreechoicesi^'SeriarvlEEE", or ■"Parallel", The 
final screen reads "Save lo Disk with Ne^\ Defaults: Uu/ 
\e$' The computer is then ready to bad WordPro 3 -h . 

The RelocatoT program is now in Ihe public domain and is 
included with all C64-LLnks. 



1. Control Mode Hola Three Control Key*! 

"Control" mode can be entered with either the "Commo- 
dore LOGO" key, the "CTRL" key, or "F7" key. Any of these 
3 keys will function as Ihe "Control" key. 

2. Backwards Slash Key Has a New Lookl 

The '^English Found" sign performs the same functions as 
the "Backslash" key in WordPro 4 + . As you know, from 
other WordPro's, the Backslash can be used to lurr on and 

off "shifted mode", it will turn the "beeper" on and off if the 
control key is pressed first, and it can also be useful for 
shortcuts in recalling and nrwmorizing - by eliminating the 
need to lype in Ihe file name when the cursor is pomting to 
the name. 

3. Tab Key Also Changes _^ 

Tlie "back arrow" (*- located just above Ihe CTRL key) has 
the same fundiOEi as the TAB key on other WordPros. 
Therefore, the back arrow would be pressed to tab over 
(move the cursor) to an indented area such as Ihe beginning 
of a parai^raph. Control -i- back arrow will jump the cursor 
cither to the bottom of the tex! on the screen, or to a "block 
code '. whichever comes first. 



New Features 



Colour is Addedl 



Differences In Numeric Mode 



One of the nicer features now added to WordPro, is the 
abtlityto change the colour of the text characters, Ihe screen 
background, and the border 

Control + Fl increases the value of Ihe colour hi Die 

characters. 
Control + F3 increases the colour value (or the .'screen, or 

background. 
Control + F5 increases the colour value for the border. 

Colour values may be decreased by pressing F2, F4 and F5 
respectively. 

_ J 

Save Colours With Program 

The colours of the screen, border, and characters may also 
be permanently saved with the program by entering a 13 
line basic program. This program is listed on a covering 

page which is included wiih the program package. 



1. Setting Numeric Tabs 

Numcriclabsarcsel the same way as regular Jabs -Control 
+ S. To enlernumbersso thai they wilt all right align, press 
Control + N before tabbini^ lo the location of Ihe first 
number. The "N" will highlight on the status line, confirm- 
ing that "Numeric Mode" has been turned on. After all 
numbers have been entered, Numeric Mode is turned off by 
again pressing Control + N. 

2. Totalling Columns of Flffur^^ 

To total the columns of figures, it is necessary to tab over 
(using back arrow) to the first column of numbers, and to 
havethecursoron the line where the total is lo appear. The 
cursor must l>e one column, or character position, to Ihe 
right of the number as illustrated below. The command 
"Control + equals sign' must be given, then thcanswer will 
appear! 
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Example; 

SlJitus Line Tab Marker . 

125^ 
2S- 

(300)*- 

(100)- 
Cursor should be here U 

when giving command to lota) 

Note: Negative numbers may be indicated by parenthesis 
as shown, or with a minus sign after ihp number. Npgarive 
ioLais will appear in the answer, the way the nei»aEive 
number was entered in the text. 

In this example, if only itie bottom two numbers are lo l>e 
totalled in the example above, cursor to Ihc line that dis- 
plays (5t}]*", and .set a range (Control -h r 4 relurn). 

When the command to total is given, the status line will ask: 
"Range or Al!7'\ Pre,'Ls "r" for range and only the bottom two 
lumbers will be totalled! 

Similarly, if only the middle two numbers are to be added 
lOi^ether, cursor to the line with 25, and set a range of two 
lines. Control + r + cursor down one -* return. 

When the command lo total is giveji. the status li[ie will 
again ask: "Range or All?". Again press "r" for ran^c and 

only Ihe middle two numbers wilt be totalled! 



n ^ 



^kciqI Comment On Erasing Function 

WordPro 3 Plus, upon very close scrutiny, may appear lo 

have one minor limitation -that being the inability lo cancel 
an erase function. For example: If, after giving thecoinmand 

"Control + e(erase)". . , which is normally followed by "r" 

for remainder, or "a" for all. . . it was decided not lo execute 
the erase hmction after all, it may seem thai there is no way 

back to normal editing mode, without "erasing" some text 
on the screen. Pressing the Control key in this case, unfortu- 
nately, does noihing to cancel the command While it is 

highly unlikely thai this would occur often, it may be 

worthwhile to make note of this little trick - just in case. 

There is just one option lefi In this siiuaiior, and this is the 

saving grace. By pressing the letter 'T', after "Control + e", 
thp system will return to edit mode! This is in fact, the latter 
half of the command lo "Erase Lines in Rani^e" (used to 
erase large quantities of text at once). The entire command 
actually involves setting a range of text lo be deleted, of 

perhaps a paragraph or two, then erasing thai range. 

If no range has been set, and the command - Control -i- 
e(erase) + l(lines in range) Is given, nothing really happens, 
except that a message appears on the status line "No Line 
Range Set" The appearanre of an error message however, is 
much easier To live with than tosing the "remainder" of text 
on llie screen, or even worse "All" the text! 



That's all for now! More next time. 
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The MANAGER Column 
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m 

John Stoveken 

Milton, Ont. 



CO^ Munuger Arrives 

Yes, The Manager is alive and wdj and running on the 
Commodore 64. The software has increased in power and 
flexibtlify and still mainlains the slraighlfoiward frie[id!i- 
ness of the curreni Manager, 

The create options behaves very similarly vvitli llie power of 
color added to the screen image. You are now permitted up 
to 250 fields with lem^Ttis ranging from I to 40 chararters. 
There is a limil to the total length of all fields which is 
dependrint on the number of fields and size of display 
positions and ranges l)elween 1 000 to 3000 characters. 

Speaking of display positions and arithmetic, we have com- 
pletely revamped The math system and have implemented 
JPL, a programming language designed sptcifi-:allv fur Jhis 
database. JPL is a fully sinjctured language that includes 
conslrucissuch as: 

if. . . .then. . .else. . . - 
endif 



and 



white do. . . 

endwhile 

JPL handles both numeric and character data to permit 
simple and boolean compare operations. As an example: 

if (f 1 - "bert') and n3<100 then 'hi berl' lo dl 

will place "hi ben' in display postfion one only if field one 

conlainsbcrtardfidd(hreehflsdvalue under too. Thedata 
that .JPL handles can be in fields, registers and display 
posiiions and all can be subscripted by others. 



The ENTER/EDIT program now includes a full boolean 
search system as well as a real (Ime 'calculate' mode. 
Alrhongh the standard search and huni is available, Ihe 



power of the boolean compares as in JPL arc extended 
through to Ihe report package as well. 

The rode is stilf hybrid BASIC and machine code (10 kbytes) 
which will permit the user tuli access to the code and data if 
he desires. All data fields are in the RE$0 array. reRisters in 
the RO array and display positions in the DP$0 array. The 
data file is a standard Commodore sequential file that can be 
accessed by BASIC or by The Manager's *BASC' extended 
BASIC. 

The -SCR FUe 

The secrets of the screen shall be revealed this month. 

Any data file that has been created with the Manager system 
has at least two disk hies associated with it. One is the actual 
data file itself, called 



name 



rd' 



and the other is the screen file which is called 



namescr 



prR 



The actual data file contains ONLY information from the 
data record. Only the carriage return on the end of each 
record and the character 255 placed at the end of the data 
file make this file unique for The Manager. It is therefore 
quite easy to import a foreign data set into The Manager by 
producing a screen with proper fielding for the other data 
file. 

The screen is a program file (created by create/ revise) that 
loads into the computer's upper memory area {$6500/ 
25856 to S7dff/32255) and tills contains all the additional 
fielding, display and arithmetic infornifltion for the data file. 
After the screen is moved up from ram to the screen ram the 
system places information about [he currently displayed 
screen into memory iocations S7eOO to $7fff (32256 to 
32767). The memory map is displayed in this table. The 
memory locations are given in hexadecimal notation. 
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Memnry Location Information 



6500 - 68ff 
6900 - 69ff 

6a00 - 6aff 

6b00 - 6b80 

6bra 

6bfb ^ 
6bfc 
6bfd 
6bfe 
6c00 - 73ff 



7-100 - 74ff 



7500 - 75ff 



-arithmetic storage area 
-screen number, line and column of dis- 
play posi I ions 

-Ijne.column and length of each field on 
screen one 

-Stan position oleach field on screen one in 
actual data record 

-graphics or upper/lower case screen 
-field ' of index field if any 
-screen * of index field 
-lengJh of index key 

-'-ind enlnes/'.mas entnes 

-screen one, including all lexl, arrows and 

backslashes as included during create 
-all display posilions are placed here and 

this entire memory area is then transfer- 
' red to the actual video ram 

-line.column and length of e^ch field on 
screen two 

-start position of each field in the actual 
data record on screen two 



7600 - 7dff -screen two, includijij; all text, arrows and 

backslashes as included during create 

The following data is placed here when the screen is wrttlen 

to the video display. 



7eO0 - 7ef f 



7f00-7i80 



-line,column and length of each field oa 

the displayed screen 
-start position of each field on the displayed 

screen in the data record 



The following information is duplicated for each screen at 

6bfO and 75fO respectively. 



TffO 
7ffl 
7rf2 
7ff3 

7115 
7fr6 

7ff8 
7ff9 
7ffa 



-7ff4 



-starting field number 

-' ol fields on the screen 
-total record length 

-higti byte and low byte for the tolal num- 
ber of records in the data file 
-current screen number — 

-total number of screens 

-ending field numt>er 
-* o( fields on the screen 
-graphics or upper/lowercase 



ON REPORT GENERATE we haveasmallgcK>die that may help you along. When you are reporting registers or perfurnmig 

calculation on numeric data (accumulating) the report system automaticaliy allocates twelve characters to the numeric data. 
The data is right iustificd in the twelve character area with a leading space or minus sign. This works fine up to the time that 
you want to prim ten numeric areas on a single eighty character line (120 is slightly larger than 80). 

if you enter the fields in the standard left to right format, the fol lowing pattern will soon develop. . , 



dataone ;: r::1234,56 

datatwo : : : :.;-123 .50 

data three : : 



952.12 



Printline :: :::1234:;: ; :-123. : : : : : :952.12: : 

1 — 5 1 5 2^5 3^5 





F P fr n + I 







Smce most reports would like to include all the data possible, the above print line does not prove adequate. If, instead of 
entering the data left to right, we specify the print positions right to left we will not loose data underneath the overlaping 
spaces as seen below. 

L 
F 

dataone :: : :: :9,^2.!3 

datatwo :: :::-l23.50 

data three : : :::I234.56 

Printline ::::: 123-^,56: :-123 .50: :: :952. 12: :::::::::: : 
1 — 5 1 5 2 5 3 5 4 — 
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TPUG Library 

Naming Conventions 



Mike Donegan 
Burlington, Ont. 
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Anyone who has been involved wilh microcomputers in the 
labt year or two, has experlenonJ Ihe confusJitj} problt^ru of 
getting a disk of programs from a friend or club and trying to 

decide whial he got. Krequenlly Ihe name of the program is 
an obscure reference to the original application thai only the 
author knows. By the lime you receive the copy, it has been 
modified many times and is very cryptic. 

I have lived with this problem fora few years. While living in 
western Canada, I regularly traded, mootched, begged, and 
borrowed progranib from all 1 nitl. My perhunaL collection 
soon grew to many disks. The problem was that when 1 
went to gel a program, I speni many hours just sorting 
through unrelatedversions-l couldn't remember the special 
name thai it had, or it was mixed tip with ver$ions written 
[or a configuration I didn't have! 

As one of the fiew librarians for TPUG, I find iho problem 

has escalated. Theclnb has fiS category disks, morp than 20 

monthly disks, and Cummodore has over 50 educational 
disks. The club decided it was too much work for one 

librarian. The library now has three sections; Craig Honner 

for VIC 20 programs. Jim Law for C64. and Fm handling 

PET/CBM, At our lirsl meetings we decided to use a number 

ofconvenlionslo help sort the programs and re.snlting^isks. 



Program Naming 

New programs added (o the library would useas the last two 
letters in the name, a period followed by a character to 
designate a machine or data type. 



Disk [Name and ID 



^ 



The disk name would be followed by a period (like filena- 
mes] and a character to indicate t^e machine type or a 
special grouping of pr<^ranis. The disk ID code would 
remain the same as before - the first character showing the 
.subject category, followed by a digit for its number in the 
subject sequence. 

list- Me Program 

Finally, each disk would have a List-Mc program, preferably 
as the first program on the disk. The contents would include 
the program directory plus d description uf edcli prugraiii \i\ 
REM statements. 

TPUG and many other groups have tried to gt:i some 
reasonable documentation on prc^rams but programmers 

are a contrary and varied group. The only club that I know 
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with complete library documenration Is WPUG (Winnipeg) 
mainly due to tlie ditigent \\orii of Bob Jolly. 1'he problem is 
thai ihc club doesn'l have the resources lo print mulliple 
copies of 75 or more page directories. 

The TPUG librarians would appieciale it if you would add 
ttiese features to your programs, with any other documenta- 
tion built into ihe progriim. Notes and instruction lists 
frequently gel separated when they don't bear the same 
names. 

The foilowing are the codes TPUG will be using; 

File ^ame Convonflon 



program name.V 

£ 
A 
,F 
.8 
-P 
-S 



VIC Programs 
C64 Programs 

40ColumnPET/CBM(9' cri) 
Fat Forty PETs 
SO Column CBM 
General PET/CBM 
SuperPET (SP9000) 
B Series (available soon) 

-W Word Processing Files 

.D Data or Seq Files 

.Z Misc. or Undefined 

■L List-MeFile 

The program Copy-All for the C64 would be: 



COPY-ALLC 



. . .where x is the Disk ID Number, 1-9, A-Z, with zero 
reserved for future u,se as a series director^'. 

Disk Name Convention 

The disk name suffix (machine type) will be the same as 
program name suffixes with these additions: 

-C Commodore 64 

y VIC 20 

■P PK'17CBM 

-S SuperPET 

.0 Old TPUG disks prior to March 83 

The fifth assembler disk for 40 Column PET/CBMs would 
be: 

Assembler *5-4 (wiili itl:)A5 

The List-Me file for this disk would be: -,-_ 

List-Me 4A5 L 

Tlie reason for choosing this lornjal is that it provides for a 
simple method of documenting a disk that is compatible 
with ali machtne types 

If anyone has any ideas to improve the sugt^cstions made 
here, I will be happy to hear them. But theoveriding idea is 
/^/^-Keepll Sijiiple Stupid. Tht method has to be easy to 
remember and implement- , 



Disk ID Convention 



I I 



Disk ID char Ax Assembler/fWacliine Code 

Bx Business 

Cx Communications 

Ex Education 

Gx Games 

Lx Languages 

Nx Math ^Science 

Sx Music 

Tx TPUG Monthly disk 

Ux Utility 

Zx Miscellaneous 
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Sweet Sixteen. 
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Jim Butterf ield 
Toronto, Ont. 
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Us an accepted fact that eight bit t:oiiiputers are more 
powerful than four-billers, and sixteen bit units more pow- 
erful [han eight, and so on. 

The question thai bothers me is this: do rhore bits always 
mean greater cost-effectiveness? That's not rhp <;anie tfiing 
as power: weVe trading capabilily against price. More: we 
must consider not just the price of the microprocessor chip, 
but the price of the whole system. 

[ sometimes fear thai we'll laJl into the hi-fi fallacy. High 
fidelity was replaced by stereophonic systems. About ten 
years ago, a number of manufdcturen> said. "Well, if two 
speakers are b^ter than one then four speakers must be 
even belter yet''. And thus a new qimdrophnnic industry - 
tapes, turntables, amplifiers, speakers and even quad head- 
phones - was born. Or rather stillborn, since it never really 
caught fire. Quadrophnnir systems really did sound better; 
but the iiupiuveiuail wasji"] guoU enough in view of the 
substantial extra cost and space requirements, 

Wliat b U7 

We'll need to dehne tpims. True sixteen-hil computers are 
Ihose that access sixteen bits of memory in a single cycle. 
There are only a few microprocessor chips that do this: the 
best known are the ^8000, the SO^fi and the Z8000. 



There's anott\er class of machine that handles I fi-bit infor- 
mation internally, but dips into menior> tiyhi bits at a lime. 
These are often called pseudo-16-bit processors, and they 
are not new. The RCA C05MAC falls into this category, for 
example, and it's been around for many years Some other 
pseudo-ie^s are the 6809 and the 8088 (Yes, the IBM 
PersonalComputerisnotatmelfi-bilter!) - 

There's a major difference between true and pseudo. The 
uliimaie speed of a machine depends on how many dips 
must be made to memory lu perform a given task. This 
includes memory accesses for both data and instructions. 
With eight L}iis, you get only half as many hits at a time: you 
need to go to memory more often. 

But we're not tuJIy following the 16-bit phenomenon if we 
simply track the strict definition, Tliere are two other things 
colouring the picture: better instruction sets, and greater 
memory access. 

Instruction Sets and Memory Addressing. 

It is nice to have a chip with powerful extra instructions. The 
new chips will perform (limited) multiplication and division; 
they have more sophisticated compare and branch instruc- 
tions, and a wide choice of addressing modes. 
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Memory addressing may be one of the mosl signilicanf new 
features of Ihe new chips. Xb RAM (rdEidom access memory) 
becomes less and less expensive, we start lo notice that 32K 
or even 64K isn't enough. The new chips allow addresses 
ih^l go far beyond this. It's udd, in a way, since 16 bits and 
64K go naturally together - but we need more memory 

addressing. 

Id Our Context . . 

Su j>wi!ching to sixteen bits (or even pseudo) gives us two 
major advantages: speed and more memory availabiliiy. If 
Ihese were free, wed accept them gratefully. Eiul there's 
usually d tusl, ajid we'll need tu decide if it's wurtliwliile fur 
us. 

How much do you need extra speed? You'll have to answer 
the question yourself, of course, but one question you might 
ask yoursell is Ihjs; how much time do 1 spend waiting for 

the computer to do sonietliing? Don't iLiclude time waiting 
for printer and disk - their speeds are not related to the 
problem. 

If you have a machine language program, chances are that 

the program activities will seem to be instantaneous. You 
may need to slow down the whole process in order to read 
the screen. If you think about this, you'll see thai in this case 
a super-speed chip would give you nolhing. 

That's not always the case. Some types of calculation take up 

lots of processor lime - sorlmg is the most obvious applica- 
tion - and you'll find that extra speed pays off. You must 
decide whether your usage would beneht from the speedup. 

Memory availability - not a true 16 bit characteristic, but 
one ihat often goes with the new chips - is also something 
that ttie user must evaluate. There are ways o( getting extra 
memory on conventional systems - the SuperPET and the 
96IC PET show how it'sdone. Bui built-in extended address- 

iig can be quite uselul it you need it. Do you need it? 



Summary, 

Sixleer bit systems cost more, irs not just the processor 
chip, but the extra memory and board wiring. You will nften 
need extra memory fur Ihe same joL, since flails will typi- 
cally take up a sixteen-bit word instead of an eight-bit one 
(one bit is all that's reaJly needed, but using a word is often 
more convenient). 

It's up to you to decide il the extra price buys you anything. 

T like to think that data falls into natural chunks. For 
caiculators and similar operations, you need a four-hit 
nidchine; a decimal dihjii lits nicely into four bits. Fur lexl 
applications, eight bits is right for fiuing an alphanumeric 
character. But I can't think of any natural data that sizes to 
sixteen bits. Nut numeric variables - they need more than 
sixteen. Now when the thirty -two bit machines arrive, they 
will be a mathematician's delight. But sixteen bits don't 
quite make it. Yes, they'll give more power and speed - but I 
can't see them bringing in a new class of applications, 

One last note- The eight-bit microprocessor is heavily 
underpinned by a major industry; the personal computer 

industry accounts for a very small part ol mjcro purchases. 
The major financing comes from - no, not the mililar}' - but 
the video game industry. I wonder if the sixleen-bit chips 
will ever get comparable volumes - and thus comparable 
economkjs. 
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VIC 20 Screen Centering 
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Are you lired u\ turning on your VIC and lelevision and not 
seeing ihc whole picture? You could open up either the VIC 
or TV and make inlernal adjustments, but not too many 
people feel couiforidble doing this. The alternative? Tell VIC 
to move over! 

Tlidl's fine you say, but how? Well, the VIC has two jnemoiy 
locations just for this. The vertical centering is controlled by 
location ;ifi8fi5 ($9001)and the horizontal by 36864 ($9000). 

What value do you put in these locations? Well, that's 
diffiCLill to say as every ViC will match up differently with the 
various televisions on the markel. You could arbitrarily 
PEEK and POKE Ic find the proper values, but Ihis is 
cumbersome. Besides, you might end up losing all of the 
screen. Don*i worr>' thoui^h, this effect is not permanent. 

Simply use the RUN/STOH RESTORE key setjuenceand the 
screen will return to its power up position. 

Or you can save yourself all that trouble by entering Pro- 
gram I , Once done and checlced for accuracy (yon may want 
tu save it first). RUN it and use the cursor control keys 
(including shifted controls) to adjust your screen. When 
satisfied with the position of Ihe screen, hit '*HOME'* and the 
prc^ram will give you back the values for your particular 
setup. Next lime you turn on your VIC |or hit RUN/STOP 
Kfcl^TOKK), just key in these values and your screen will be 
centered. 



Peter J. Lear 
Burlington, Ont. 



If you don't care for this, try Program 2. This is Ihe .same 
thing, only in luachitie Idaijuage, It moves BASIC up and 
therefore is accessible whenever needed. All you need do is 
reference the chart t>elow to initiate the machine language 
subroutine. It does not report the po^iljon values as the 
program is always available. 

To enter Program 2A you can use any of the machine 
language monitors fw the VIC, or use a PET/CBM with the 
built in monitor and enter Program 2K. In the interesl of 
standardizing thingj> on [he VIC» remove any memory car- 
tridges before typing it in. You can do it with extra memory, 
but things change with extra memory that will affect this 
procedure. Once it has been SAVEd properly, any VIC with 
or without extra memory can utilize the program. 

If you're usijjg a VIC, enter the monitor with SYS 13 and 



m 002b 0032 



<returii> 



Change the values shown to read: 

002b01 lOeSIOeS 
0030 10e8 1(J[)7 1h 

This procedure sets the End of BASIC pointer such that a 
SAVE will store our program lorrectly Now type in Program 
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2A Rxit fhe mnnitor and check for errors wirh the followirifi 
line: 

for 1 = 409610 4327: >t = K + peek(i) : next : print x 

You should get a value for back of 21786. If not, re-enlei the 
monitor and look for errors. Once correct. SAVE it as a 
normal program with: 

save 'screen center' 
Verify it and you>e ready to run. 

If entering on a PET/CBM. go inio the monitor with SYS 4 
and type; 



Once again, these stops set up the proper pointers for SAVE 
later on. Type in Program 2B, exit the monitor and use the 
Eullowinjj tu eheck for errors: 

tori=l[)24to 1255 . x =^ x + pee^i) : next . prinix 

If you do not get hack 217G2. re-enter the monitor and 

checkforerrors. When the progr^imi^all clean, SAVE it. You 
can now try it uul on a ViC, 



Table 1 



m 0028 002e 



<ieturn> 



VIC Seiup 
no cartridges 
3K cartridge 

8K or more 



To Access: 
5Y.S 42:^0 
SYS U 58 
SYS 4742 



Change the given values to read: 



OQ280104e804eS04e804 



Program 1: BASIC Version 



100 rem vie 20 !>creen centering 

110 rem by peter kar 
120hz=5:vl = 25 

130 poke 36864. hz : poke 36865, vt 

140ifpeek{197}-23andpeek(653)-0thtnhiE = Jii+l 

I50ifpeek(l97| = 23andpeek(653)-1 thenhz=hz-l 

160 if peek{l 971 = 31 and peek(653) = then vt = vt + 1 

170ifpeek(107| = 31andpeek(G53)-l lhenvl = vt-l 

180ifpeek(197|=62then200 

190sotol30 

200 for i= 1 to 10 : get a$ : nest : rem dear keytxl qjeue 

210print 'to center screen:" ; print 

220 print " poke 36864, " :peek(36864) 

230 print " poke 36865. ' .peek(3G8G5) 



ifhi^64t[ieuliz=a 
ifhz=-l thcnhz^64 
llvt=l28lhenvt = () 
ifvl = -l llienvt= 128 
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Program 2A: VIC 20 Hex Dump 



Program 2B: PET/CBM Hev Dump 



.m 1000 1060 <retiirn> 


.: 1000 00 3c 10 64 00 


.: 1005 99 22 93 11 11 


.: 100a 11 n n 11 11 


:IOOf n 11 Idldid 


.: 1014 id ]d53 43 52 


.: 1019 45 45 4e 20 43 :, 


.:l01e45 4e54 45 52 


.: I023 22 3ay9 2:j 11 


„ 1023 Id Id Id Id Id 


.:IO2d42 59 2O50 45 


.11032 54 45 52 20 4c 


.: 1037 45 41 52 22 00 


.:!03c56 10 6e00 9e 


,: 1041 28 c2 28 34 33 


.: 1046 29 aa 32 35 36 


-:104bacc2 2834 34 


.;l05029aa38 37 29 


.: 1055 00 00 00 eG 2c 


,:105ae6 2e€6 30ee 


,:105! 32 ay Oi 65 2c 


,m 1064 10c3 <remrn> 


,: I064a9 4e8d77 02 


.; I069a9 45 8d78 02 


,:l06ea9 57 8d79 02 


,; K)73ayOd8d7a02 


,: I078a9 04 85c6t:6 


,: 107d2ba9 00a2 0C 


,; 108281 2be6 2ba2 


.: 1087 ff a4IJ 88 dO 


,: 108c fd cadOfS a4 


,; 1091 c5aeSd()2e() 


.: 109001 d0 26c0 17 


,: 109bd0 0ead00 90 


.: 10aOc9 0()di)(12a9 


,:10a5 40e9 018d00 


,: 10aa90c0 H dO 34 - 


.: lOal ad()l9()r9()n 


,: 10b4d0 02a9 8ae9 


,:10b9018d0190 10 


,: 10bec7cO 17d0 0e 


,: 10^3 a(]0O9OE:9 40 


m 10c8 10e7 <relum> 


,: 10t:8d0 02a9 00 69 


,: lOcdOl 8d00 90c0 


.: 10d2 1f done ad 01 


.: 10d7 90t9 80d0 02 


,: 10dca9 00 6901 8d 


.: iOel 01 90c0 3edC 


,: IOe6 9I 60 00 00 00 



- K 



,ni 0400 0478 
0400 00 3c 04 
0408 1 1 1 1 1 1 
0410 11 Id Id 
0418 52 45 45 
0420 54 45 52 
0428 Id Id Id 
0430 50 45 54 
0438 41 52 22 
0440 9e 28 c2 
0448 32 35 36 
0450 29 aa 38 
0458 e6 2t e6 
0460 39 0165 
0468 02 a9 45 
0470 8d 79 02 
0478 a9 04 85 



[a048004cO 
0480 a2 00 81 
048ft a4tf 88 
0490 a4 c5 ae 
0498 26 cO 17 
04aO r9 00 dO 
04a8 8d 00 90 
04b0 01 90 c9 
04b8e9 01 8d 

04cO 17d0 0e 
04c8 do 02 a9 
04d0 90rO If 
04d8 c9 80 dO 
04e0 8d0190 



<renjrn> 

64 00 99 22 93 
11 11 11 11 11 
Id Id Id 53 43 
4e20 43 45 4e 
22 :^a 99 22 1 1 
Id Id 42 59 20 
45 52 20 4c 45 
00 5fi 04 fie no 

28 34 33 29 aa 
ac c2 28 34 34 
37 29 00 00 00 
2e e6 30 e6 32 
2c a9 4e 8d 77 
M 78 02 a9 57 
a9 Od Sd 7a 02 
c6 c6 2b a9 00 

<return> 
2b e6 2b a2 f( 
dO M ca dO f8 

8dO2eO01dO 
dO Oc ad 00 90 
02 a9 40^9 01 
cOH do 34 ad 

00 dO 02 flO 80 

01 9010c7cO 
ad 00 90 c9 40 
00 69 01 SdOO 
dOOeadOl 90 

02 a9 00 69 01 
cO 3e dO 9f 60 



t ' 



rtie rransocBor 



April 19S3 



^ 



Catstrapolator 



Writing disk based software? Often you'll waul lo extrapo- 
larp some informalion from your direclory or Catalog - 
hence the name 'Caisirapolalor". 

This mighl bp ^i*ik name, ID, file type or even binrks frpp 
Programs lo obtain Itiis information Ironi the disk unit hdve 
been published in the past, but they usually read it directly 
from disk memory'. With so many disk operatirg systems 
reieased, a new version was necessary for eatli. This one is 

universal. - -m.',. 

Calsrapolator goes after the disk director} tfiroLiRh Second- 
ary Address 0, SA is reserved by the DOS for program 
loading and is also uwd for *"lnading" the directory (ip. 
LOAD "£',8), When tlie DOS bees a S bign as the first 
characterof the filename in a LOAD command, the informa- 
tion in the directory is manipulated by the DOS into a formal 

compatible with LIST. Thus, the command. 

r 

OPENl.ft,0, "SO" 

causes the disk to deliver catalog data the same way it would 
for LOAD "$0-.R, 

Fortunately, Commodore has maintained a fairly consistent 
catalog format which makes Catstrapolator universal for all 
drives incliidini^ 4040, 2031, 8050, 8250, 9060/90. and 
1540/41. The only n on -universal part is the siring input 
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routine held in the data statements at the start of the 
program. This is actually Jim Rulterfield's Universal String 
Thing but even this is not universal between VlC/64s and 
PET/CBMs- If youVe already using ihis utility somewhere 
else In yfjurprogram, only lines 190 onward will get *;lippefi 
in. Otiierwise. VIC/C6^ users will replace line^ 130-170 
wilh the separate sub-listing shown. 



Proffram Operation 
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Catrapuidlor will work ail by itself as shown, but il was 
meant to be used as a subroutine. You can even remove 
parts fhat return information you may not he interpsted in, 
such as file type (ie PRG, SEQ, etc). 

Line 180 should t>eincluded withlhesubroulinesothat it i^; 
executedon each call. Make sure [lojie of these variables are 
used elsewhere in your program so as not lo disturb them. 

T 

Lines 190-210 input information thai would normally be 
passed lo the routine, in which case 190-210 would be 
omitted FIS is the target filename. This is transferred to PT$ 
for the OPEN conimand. However, if FI5 is Jiull, FTS is >et lo 
''no patlern", a filename that probably does not exist, and 
only blocks free will be reported. If R$ IS parsed, BU will he 
hello the number of bltxks used by FIS, but only if it isinlhe 
directory. If no match is found, BU will remain zero. 
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Fi$ may eveii coiUaJn pd[ierii nialching characters. For 
example, if FI$= " CAT* " . all disk files starling wilh CAT 
win be reported, BU will return Ihp blocks used by the last 
malch.aiid Bl will be Ihe nunib^^r of blocks used by the first 
match. Likewise, F$ and FT$ will be the filename and the 
Mle type last matched wilh FF$ and FIS containing the 
filename and typt- ol tht: lifbl jjiaiuh. BF will always return 
Blocks Free. 

Mud ifkati oils 

Lines 240-300 return the disk n^ime and ID If this is iht 

only info you'll need to extrapolate, simply omll lines 
310-540- 

Several utbt^r fijaiurtisuf ibis subruuiinecan also be skipped 
if ihey won't be necessary or just to reduce space consump- 
tion. If you won^l be roncertied wilh blocks used by a file, it's 
actual filename (if patlertJ nialching characters are present) 
and filetypes, then omit 360^60, 490, & 500 and move line 
540 up to 520. This variation will only gpl hark RUx-ks Free. 
Many cumbinaliuiii are pusiible. . . you can decide which 
you need mosl. 

You may have Jiodced two [est;s on ST the status variable. If 
the program is entered in its entirety, Ihe test at line 480 can 
be left out, ST will be caught in 'M) unless 1^90 is removed. 

Technicalities *■ _ 

Those POKEj^ ^Lattered about llie program are changjngttie 
machine code ilself. You'll notice thai the POKEs are di- 
rected right at the machine code, where thie tesi for "delim- 
iter received?" is perlonned. By dianiiini^ the delimiter 
character the program can inch its way along from one part 
of the directory' to Ihe nexl. 



The delimiter is initiaily a Carriage Return as set up in rhe 
machine code. Line 240 changes il to a quote. When the 
input routine is called in 250, the characters up to a»d 
including the first quote in the disk header are essentially 
^'stripped off. Ijiunedidtely followiiig is llie Disk Name 
which is retrieved by the second SYS MC. 

Alter the ID Is obtained. Ihe delimilttr is dianged to a zero 
since this will mark the end of the header line. 

The Blocks Used by s|jecilic files are read by two GET*s after 
the line links are stripped (also with two GET's). Following 
this, ttte delimiter is changed back and forth from 34 (quote) 
to zero for reading filenames ajKi filetypes. 

Before exiting, the delimiter is set back to Carriage Return 
for laler use. 



Summary 



Using this subroutine can be invaljable to Business soft- 
ware pnagrammers, A truly smart program could determine 
if there's enough room on the disk to update a file by 
comparing the number of blocks it uses to Blocks Free. Also, 
a program could decide if Ihe correct diskette has been 
inserted by examing the ID or disk name. 

Admittedly, Catstrapolalur is dependent on Jim's machine 
code input routine, but no doubt, Siring Thing could find 
ilself anotfier use in a djflerent section of the fiost program. 

■ 

Rnady. most of the PRINT statements will probably be 
removed when the subroutine is inserted, making it much 
shorter than it looks. You might also combine several of the 
tingle lines. 



I 
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String Thing - VIC 20 / Commodore 64 Version 



J, 



130 data 160, 2,177, 45.153,137. 0.200,192. 6.208.246,162, 1 
Mtldala 32,198.255, 32,228,255,201, 13,240, 15, 16-1. 142, H5, 110 
150data200, 132, 142, 196. 139,240, 4. 165. 144.240.234. 76,204,255 
ISO restore : for j = mc to mcH- 41 : read x : poke j,x ; t = t+x; iiexl 
170ift<>B120rhpn print "typo in data" : slop 



1 
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; rem sa mus[ = 

; rem make input delimiter a quote 

: rem strip 1o Isl, input lo2nd 

; rem disk name siring 

:rem first a$ is waste 

: rem disk id = next two "'^ 



100 iS= ''abcdefghijkImriopstuvwxyzl234 ' : rem i$ nnjrtbe 1st var used 
1 10il = it + i$'M$ : rem establlsti input bulfer 

120mc-896 : rem macl^ codeslarl addr 

130dalal60 2,177. 42, L^3. 184, 0.200.192. 6.208.246,162 
MOdaia 1. 32,198.255. 32.228.255.201. 13.240. 11.164,189 
150dalaI45, 187,200.132,189,196,186.208.238. 76.204.255 
1 60 restore : for j = mc to mc + 37 : read x : poke j, x : t = t + x : next 
1 70 if t<>5767 then prim "" lypo in daia " : stop 
180zS-chr$(0).pt$-" no pattern" :bl =0 ;bu = 0: ffS= " " ;fl$= 
190 input "display blocks used by file:" ;fiS 
200 Inpul " on drive: " ;dr 

210irpul ' on device:' ;dv 

220iffi$<>" tlienpt$ = fi$ 

230open l,dv, 0. "f +mid$(slr$(dr),2)+ ":' +plS 

240pokem<:+2l,34 

250sysmc: sys mc 

260dnl = lefi$[i$.peek(189)) 

270get-l.a$, a$, b$ 

.280id$=a$-4-b$ 

290 print "disk name = ":dn$ 

300 print" disk id = ^id$ 

310pokemc+21,0 

320 sys mc 

330get-^l. wS.wS 

340get'raS,b$ 

350bf=asc(a$ + zS) + asc<bS-hZ$(*256 

3GOifbl=0lhenbl=bf 

370 poke mc + 2 1.34 

380 sys mc 

390 if St then 520 

400 sys mc 

410f$ = lefl$ai.peek(18911 

420ifff£=" thenff$ = f$ 

430 poke mc+2l,0 

440 sys mc 

450flS = righl$(lefl$(i$,pcek(189)-len(3tr$(bf))).3) 

460iffl$=""' thenfl$ = ftS 

470gel'l.w*.w$ 

480if5Uhen520 

490 bu = bf 

500 print " blocks used by " ft$ " hie ' f$ ' = ' ;bu 

510 goto 340 

520 if bu then print "blocks used by 1st 'fl$^ file "ffS 

530 rem print above only if bu was set [blocks used) 

540 print " blocks free - ' ;bf 

550 close 1 - 

560pokemc-i-21. 13 

570 end : return 



: rem make input ddimiter (end of line) 

: remslrip rest of head 

: rem 2 waste bytes 

; rem file blocks or blocks free 

: rem calculate block count 

: rem bikcnf for 1st match .set once only 

: T9m make input delimiter a quote 

: rem strip to first quote 

; rem no quote befor biks free, must b end 

: rem input up to next quote (filename) 

: rem 189 holds length of valid input 

: rem fft = first filename match 

! rem make input delimiter again 

: rem get remaining to extract 

: rem file type 

: remfIS = file typ for 1st match 

: rem waste two more 

; rem end of file, go print biks free 

: rem . .onlv if file match found 



= ";bl 



rem close dir 

rem make input delimiter cr again 

rem remove end for subrout use , 
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Making Friends With Sid 
Part 2 



Paul Higginbottom 
Toronto, Ont. 






»_ 



M' 



Hello again. Last issue, we gol acquainled with some of the 

various terms and parts ol the SlD cEiip. We're now 
equipped to learn some more advanced things about the 
synthesizer, as well as more advanced techniques lo fully 
uhlize whal we have already learned. Lo. tor example- 
produce more than one note simullaneously. and then, lo 
create software that can play actual pieces of music. 

So there are, in fact, two areas thai this and subsequent 
articles plan to deal with: 

1 ) Define the capabilities of SID 



varying degrees above, below or around a given 'CUTOFF 

Iretiuency. However, don I woriy a&out understanding this 
concept fully yet, since this issue won't use the filtering 
capabilities of the SID, 1 simply wanted to make you aware of 
this feature in the SIU. so you won't be taken by surprise ia 
the future! 
To begin with, let's try lo emul^e one of the simplest 

sounds: A piano. When a piano key is siruck, the sound 

begins immediately, and then fades away in about two 
seconds if the key is held down. If the key is released before 
the sound has faded away, li will fade much more rapidly, in 
say, half a second. 



2) iLJtplain some software techniques to make ^lU perform. Try this program: 



Thistime, rd like lo put some of the last article's theory into 
praclice, by giving some parameters for the SID. which wilJ 
make it sound similar to musical instruments, 1 think this 
would be useful, so that you will t>e able to see that a music 
synthesizer is not limited eo beeps and pops, and other 
sounds from television shows like "The Twilight Zone"! 

In the last anicle, the various parameters of a voice were 
outlined, except for the filter in the SID, Essentially, the filler 
will (as is implied) filter the sound output from any of the 
voices in a number of ways. The actual term 'filtering' 
means that the sound is changed by quietening the voice to 



I0sid = 54272 

20ton = 0to24: pokesid-t-i, : next 
30pokesid-f-24,15 
40pokesid + 5, 10 
50pokesid-+-6. 9 
60 key = 197 
70pokesid+l. 16 
80geta$:i[aS= '"" goto 80 
90 poke Sid -^ 4. 33 
100 if peek(key)064 goto 80 

no poke Sid + 4. 32 
120 goto 80 
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Explanation of Program: 



Line 

Line 
Line 
Line 
Une 
Line 



Line 



Line 



*z 



1 declares the variable SID ro the stan iocalion of ihe 
SID chip. 

20 POKE s all the SID locations with a zero to initialize 
the chip. 

30 sets SID register 24 to 15. which sets (he chip to 

maxinnim volume. 
40 sets SID register 5 to 1 0, which makes the attack of 
^ voice one 0, and Ihe decay value 10. 
50 sets SID register 6 fo 9, which makes the sustain of 

voice one 0, and the release value 9. 

SOdecIaresthevariable KEY to thezero page memory 
location whirh holds the keyboard matrix number 
of Ihe curreni key d^ressed. or 64 if no key, 

70 sets SID register I to 16, which sets the high order 
hyle of the frpfjuency of voice 1 (therefore, fre- 
quency of voice 1 = 16*256) (see last article for 
explanation of low" and 'high' bytes). 

80 waits for a key, tiy GETting a keypress from the 
keyboard, and IF the ke>-press is a null, ie.. no key 
has been pressed, the program will GOTO the 
same line and keep waiting. 



Line 90 sets SID rt^cr 4 wiUi 33, whidi i^aies voice 1 on 
with a triangular waveform (see last article for 

explanation [3:i = :^2 + l J) 

Line 100 checks lo see if a key is siill depressed (as with a 
piano), and if il is (ic, location KEY is still some- 
thing other than 64). the program will GOTO the 
saEiie line and check again. 

Line UO sets SID register 4 with 32, which gales voice 1 off 
now that no key is depressed on the keyboard, still 
with a triangular waveform. 

Line 1 20 simply goes back to line 80 to allow ihc program to 
continue indefinitely (to stop the program, the 
STOP key must be pressed). 

Something which ought to be nnder^tood here i^; the fact 
that when a voice is gated u(f, ie. rt^teased. Ihe envelope 
RELEASES from WHEREVER it had reached. Probably a 
diagram would he the be^t uav to show this: 



Example; 

Attack =5, 
Decay = 5, 

Sustain =10. 

Release ^8, 



ie. 5G milliseconds. 

ie. 168 milliseconds- 

ie. two thirds of maximum volume 

ie. 750 iTiilii^econds. 



. t 



Maximum 
Volume 



Signal" 




Galed on 



I 



ttack TDecay- 

56ms l6Sms 



Sustain- 



Galed off 



Release" 
750ms 



Now using the same parameters, only gating the voice off (ie, releasing) at a different point: 



Maximum 
Volume 



Signal- 




I 



Gated off 



. T 



ttack— ^3ecay-f —- - -^ 
56ms 1 68ms 

Release' 
750ms 






J I 



43 



April 19t3 



Here, U can be seen thai the voice was gftted off (ie. 
released), before Ihe envelope had decayed to ils sustained 
level, but when the voice was released, it simply released 

from the point it had reached. 

I 

This relates 10 the program you just eniered. because il uses 
this iaci to simulaic the ^fccl' of o piano keyboard. That is, as 
soon as you release the key on the keyboard, the envelope 
will be^in its release cycle which is set at 9, one less than the 
d^;aiy value (10), giving the same response as a piano key, 
by fading away quicker once the key is released. Of course 

the force wUh which the key is hll in the first place, which on 

a piano gives the initial volume, cannot be simulated here, 
because a key on any computer keyboard, is either DOWN, 
or UP; the speed of transition cannot be detected. 

Similarly, if a voice is gafeci on before the release cycle has 
finished, the attack will begin from wherever the envelope 
currently isfie. the currenloutpul volume). To see this more 
clearly, enter the following to change our program: 

'lO poke sid + 5, 11*16-^13 
50pokesid + 6.9M6+n 

(jnc40 sets SID register 5 to 11*16+ 13» which makes the 
attack of voice one 11, and the df^ray value 13. 

Line 50 sets SID register 6 to 9*16+ 11, which makes the 
sustain of voice one 9, and the release value 1 1 . 

When you RUN Ihe program this lime, the aaual path of the 
er>vclc^e will be more audibly clear. When you press a key 
this fime and hold il dnwn. you'll hear the volume rise 
(attack!, and then fade some (decay) to a constant level 

(sustain level). When you release the key, the tone will fade 
away to nothing (release) However, if you depres-i and 
release the key quickly, youll hear that the tone never 
reaches a very high volume at all, and thai is because the 
release occurred (ie. by you releasing the key), before the 

envelope had reached either its maximum, or the sustained 

level of volume. Similarly if you press Ihe key again verv 
so^n after releasing it, you'll note thai the sound builds up 
aftain Irom the level it had faded away to, and if you keep 
depressing and releasing the key, and ensure that you're 
holding the key down for slightly longer than the time 
you're not, you will "pump up" the volume. 

A program that would allow us to '*test" envelope and 

waveform combinations woulci certainly be usefuL It would 
enable us to experiment with the parameters available to 
creates desired sound It would bf* useful if we could "play" 
Ihe Commodore-64's synthesizer too. from the keyboard. 

r ■ — * 

Before we can gel that far though I'd like to explain hovu to 



derive Ihe frequencies for musical notes on the Commodore 
64. 

Inamuskalscale, the ratio of pilch between one octave and 
the next is 2:L If we had the frequencies of the 12 semi- 

-lones ol the top octave, we cou Id-generate the values of all 

the lower notes by continually dividing all 12 by 2 to derive 
the pitch of the semitones in the next octave lower. It is not 
necessary (o go into the math here, bul il the ratio between 
octave.s is 3:1, then the ratio between semi-tones is 
2t[l/12):l. 

Middle A on a piano, is 440Mz, To convert harmonic fre- 
quencies to the fundamental frequencies we need to put in 

the SID registers, we need to multiply the former by a 

constant which is derived from the frequency of the internal 
clock in the SID chip, and the system clock. 



Fundamental Frequency x system clock speed 



Frequency = 



SID dock speed 



Therefore: 



Fundamental Frequency - 



Frequency x SID dock speed 
system clock speed 



Which turns out to: 



Fundamental Frequency = Frequencyx 16.404Capprox,) 

Therefore, middle A which is 440Hz, would be 

= 440x16.404 I 
= 7217(approx.) 

I 

'A' in Ihe next octave up would be 880Hz. or 
880x16.404 = 1 4435 in Ihe SIU chip. 

The maximum value in The SID chip is 65535 {255 in both 
the low and high byte), therefore, by doubling again. . , - 



1760(1760x16.404 = 28871) 



and again. . . 



3520(3520x16.404 = 57742) 



57742 is faidy near the top end of the SID frequency value 
range, and doubling once more wr»uld push it beyond it. so 
we will base our frequency range around 3520Hz. To create 
a 2 dimensional array (subscripts being 'octave', ^r\d 'semi- 
tone') of frpqiiencies. we could use Ihe following program: 



TIm IhMtKKlor 
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100 fr = 3520 
ll0co=2t(l/12) 

120fori = l lo9;fr=fr/co 
130 next 

140ss=l67772l6 
150 cs= 1022730 
160fc = ss/cs 
200(liinf{7,ll) 
300fori-0loll 
310s = fr"fc 



iremnote'a inlopociave 

:rem constant muHiplier for next semilone 

:rem 5tart it al 'c' by going back 9 semitones 



:rem sid clock 

irem cpu clock 

:rem frequency multiplying constant 

:rem Irequency array (octave, semitone) 

:renn cycle through 12 semitones 

:rem calculate sid value of semitone in top octave 

'100forj = 7lo0slep-1 :fU.i) = s: s = s/2 

410 next :rem caic value for all 8 octaves 

420 fr = fr*co :rem go onto next semitone 

430 next :reni continue through all 12 semitones 

450 rem 

460 rem print out all the frequencies 

500 print " frequency table" 

510 print " " 

520 print "ocl sem frequency' 
600fori=0to7 
6l0forj = 0toll 
620pnnti:tab(4):j,int(f(i.j)) 

630 next j, i 

■ J 

The REMarks in the program explain Kow it works. \dd the following lines to hear the frequency array: 



470 s -54272 iremstarl address of 5id chip 

475fori=0to 24 : pokes-+-i,0 : next rrem initialize sid chip 



480pokes-H24, 15 

485 poke sH- 5, 11 

624pokes + 4,32 

625h = int(f(i,i)/256) 

626l-f(i,j)-h*256 

627 poke s. I : poke s + 1 , h 

628 pokes + 4. 33 

620 for k-lto 100: next 



:rem set volume 

:rem attack = 0:deca>' = 0:suslain = 0:relea5e= 11 

:rem gale off the voice first 

:rem calc hi^h bvte of frequency 

:rem calc low byie 

Tern put in frequency 

:rem nowi^ateilon 

:rcin wait a bit 



When you RUN the program this time, asthefrequenciesarelisted, each pitch will be sounded. 



I would imagine that this is quite enough reabsorb this time, and we'll s,e[ onto the parameter restinit program next time. 
Mahc sure you understand what has ticcn covered so far. otherwise the next and subsequent artictes will slowly become 
impossible to follow Have fun. 
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New Character Sets 
On The Commodore 64 



Jim Butterfield 
Toronto, Ont. 
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Question: How do \ redefine (he characters on the Commo- 
dore 64? 

,1 
Answer: There are 50 many ways Oidl it's not possible to 
give a gL^nera) answer. The following outlines the 
steps to follow. Willi a specific example: 

r 

A, Plan where you ^ant everj-thing to go- 
Screen memory, characters, and sprites if you use ihem 
must all fit inio the same 16K bbck of memory. To do your 
own character set, you'll probably wani lo leave the default 
block, to 1G383. A good block to pick would be llie lop 
one. which extends from 49152 to 65535. Well pick Ihe 
detailed locations lor characters and screen a Utile later. 

Don't do this yet. but we will selec', Ihe top block by 
perIormingPOKE5b576.4. 

Now. wilhin that block we must pick screen and character 
sel locations. Lookjng al the memory maps, we find that the 
top half, addresses 57344 to 65535, is used for the Kernal 
ROM. We could still use this area: POKEing to the screen 
and Ihe character set would still make the changes in HAM 
to cause the screen tu change appropriately. The only 
problem might be that we couldn't PEEK these locations - 

we'd get the KUM instead of Ihe KAM. Some programs litce 

to PEEK the screen to see what's there. 
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Locations 53248 to 57343 are nol too suitable - the I/O 
chips are located there, and we'd have to do cxira work to 
PEEK or POKL That leaves 49152 to 53247 for the screen 

and character sel. 

A character set (the "'character base") must start at an even 
jiiuUiple of 1024, and of cour^it- must be in the seleaed 
memory block. This leaves us wilh 49152 (slart-of-block 
plus 1024 timesmultipleO)and5l200(oflse1mullipte2). It 
doesr'l matter which one we pick. . . let's use ilie first ore, 
which means Ehat our character sel will go from 49152 lo 
51199. Now for the screen: we must pick any multiple oi 
1024 that's in range. Skipping over the character set area, 
we have a choice ol 51200 (multiple 2) and 52224 (multiple 
3). We'll pick the first, so that screen memory occupies 
51200 to 52223. 

Lefs look at those multiple numbers again. A character set 
starling at 49152 is at an offset of zero within the 16K 
block, , . which is times 102-1. A screen memory block 
startingat 512U0 is at an offset of 2048 within the block. . . 
which is 2 times 1024. To set the video chip to use these 
actual screen addresses we'll do some arithmetic on the 
multiples: 2 (the screen) times sixteen, plus (the character 
set), givhig 32. , , and we POKE 53272,32. 
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B, Tel) Basic 

The [y/o POKEs lidve lolcJ llie video chip where screen 

memoTyand (he character set is located. . . but we must also 
tell Basjc about ir, or Bssic will insist on putting ever>lhing 
in llie old address, 1024 tu 2032. We tell Basic about the 
screen with POKE 648, 200. Why 200? Thai's the screen 
memory address (5 1 200) divided by 2f^6. 

It wouldn't hurt to clear the screen here, since we've moved 
to a new area of memory that's cJurtered with unused 
values. 

C Supply a Character Set 

We have told The video chip that there is a character set at 
49152. . but we haven't put any rhararlftrs There You ran 
deh[ie your own diaraaers. of course, for the iiiomeni. lei's 
just copy the characters out of the ROM, 

Tht processor will fiLid the charadet ROM at address 53248 
to 55295. That's odd for two reasons. First, the video chip 
found It at an entirely different Jocation. . , we can tlismiss 
this a one ol the magics of electronics. Secondly, we nor- 
mally see the I/O chips at these locations. . . the character 
set IS hidden behind these chips, and we'll need to expose it 
by POKE I, 51. . . but noT yet! 

Before we make the I/O chip^ vanish, we 11 need to lock out 
the inlerrupi. The liiterrupl sequences, whidi dieck the 
keyboard and do other jobs, will get hopelessly confused if 
the i/U chips are not there. Take my advice- never get the 
internjpt sequences hopelessly confused; it's not good for 
your program's health- We may lock out the interrupt with 
the command POKK5f>H"iH3, 127. . . but we must remember 
faithfully to pul it back, 

A Demonstration Program 

Wecan do alt this in a small Basicprogram toshowthalit all 
work.s Let's Rtarl by following the snggested sequence of 
pokes: 
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100 rem character set demo 
Il0poke56576,4 (set ISKbank) 
120 poke 53272,32 (set screen &ch set) 
130 poke 648, 200 (tell Basic) 

r 

Next we wish to move the character set. . . but let's make 
this a visual thing. We'll prinT something an the screen first 
Tills will initially appear as scrambled Information^ since the 
characters haven't been defined. As the characters arc 
copied over Irom ROM, we'll see them take shape. 



1 40 prim chr$(147) (clear screen} 

150forj-1 to2 

1 60 print " the quick brown fox jumped over 

a lazy dog's back 1 234567890 ' 
170 print chr$(18): 
180 next j 

Mow let's copy the character set: 



200fori = 0to2047 
210 poke 56333, 127 
220 poke I. 51 
230 N - pcekQ + 53248) 
240pokel,55 
250 poke 56333, 129 
260 pokej-t- 49152.x 
270 next] 



(lockout interrupt) 
(reveal chargen) 

(gel 1/S character) 
(restore I/O) 
(free interrupt) 

(copy character part) 



One final fojch. We have copied the existing character 
set. . . but we haven t defined anything new. Let's prove we 

can do it now by adding a slash ro the letter "0" - this will 

make it look a little like the greek letter thela, or a sloppy 
number eight '0" is the fifteenth letter of the alphabet, and 

each letter lakes up eight bytes. So we can calculate that 
starts at 49152 plus eight times 15. . . that gives 49272. Since 
we want to change the middle of the letter, not the top, we 
move down three more bytes and type: - . 

2S0 poke 49275, 126 

Check your program (mistakes can t>e fatal) and then RUN it. 
It's sufficiently slow that you can see the various characters 
being formed. Ttie alphabetics come first, followed by the 
numerics; some time later, the reverse characters are de- 
fined, ' > 

Conclusion 

I 

There are lots of ways of setting up your own charaaer set. 
This is just one way. 

The first time is the hardest. . . once you\e done it success- 
fully, you'll be able to cut your own characters without 
problems. 



Machine Code Version 



G.A. Campbell 
Toronto, Ont. 



You've just seen how to do it in BASIC Now let's try it in 
machine language. 

The attached program disbles the interrupts, enables access 
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to the character generator (which simultaneously disables 
all l/0|, and rhen copies the contents of Ihe character 
generator ROM iiiluRAM. The final aaivilies are [oturii I/O 
back on, allow interrupts, and tell the video controller to get 
Ihe character definitions from RAM. The procedure is the 
same in BASIC, only the instructions change. 

Once you have run this program, yon ran modify the 
character set by POKEijig into the appropriate RAM. [Once 
again] The character definitions begin at memory location 
49l?2 (hex SCOUU) Each character takes np S hyles of 
memory, beginning with the top row of dob for Ihe charac- 
ter working dowri. 

The offset fur a given character is 8 limes Ihe "screen code" 
for that character plus the start address of the character base. 
Appendix E of the C64 User Guide lists the serpen codes. 
The entire set take* -IK. Ttie first K is the normal Uppercase 
and graphics sel The second is the same, only in reverse 
field- Normal Upper/Lower case is in the third K. and the 
fourth K is same only reversed. 

For example, if we want to change the "ampersand" {'K') 
into a square block in the middle of the character position, 
we would follow these steps: 

1 . Map uut the POKEs to be used: 



1. Code the pokes: 





- 




- 


. -XXXX. . 


-60(32-1^16 + 8 + 4) 


. .xxxx, . 


-60 


. .xxxx. . 


-60 


. .xxxx. . 


-60 




- 




- 



1 - 



poke 49456.0 
poke 49457.0 
poke 49458. 60 
poke 49459, 60 
poke 49460, 60 
poke494fil.fiO 

poke 49462,0 
poke 49463, 



The Basic Loader below is followed by the machine code 

source listing for the same routine. The program is self 
modifying. While this is generally had practice, ji does make 
the prosram smaller and easier to type in. 
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BASIC Loader 



6000 for j=832 to 881 : read x ; ch = ch 

6010 poke j, X ' next 

6020 if di<>61 13 then prim ' data error 

6030 print 'H" 

6040 -sy*; R?i2 

6050 return 

6O60datal20, 169. 51.133, 1.160 

6070 data 224, 1(J2, 0. 189, 0.208 

6080 data 157. 0. 192, 232, 208, 247 

6090 data 238, 75. 3.238. 78. 3 

filO0data2O4, 75. 3,208.235,169 

6110data 55J33, 1. 88.169, 32 

6120 data 141, 24.208. 169. 4J41 

6130dat;i 0.221.169.200,141.136 

6140 data 2, 96 



* X 



stop 



Editor's INote 



2. Look up the screen code (ampersand is 38) 



3. Calculate it's address: 



Si' loc = 49152 -f 3S-8 = 49456 



Tfieprogram above h Gord's machine language character 
niuver nioditied slii^hily to reflect what Jim is doing In Baslc. 
Gord's original version appears below which matches what 
Paul Higgirhottnm is doing in hisCnmmodnrp64 character 
editor ihis i^bue. H you like, the loliowinti lines can replace 
lines 6000-6090 of Paul's program to make the character 
Iran'ifer a little qnicker The above version could also he 
used, but tills would mean some of the other variables in 
Paul's program would need changing. 
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Source Code Listing 



I 



100: 


; copy 


character set 




110: 


; from rom lo ram 


^- ^ 


120: 


i on the c64 

4 






140:0340 


r 

* 


-— 


$0340 


■ 


150:0340 


lomctl 


^ 


$01 




1 60: 0340 


basctl 


= 


£0288 




170:0;S4O 


chrram 


^ 


ScOOO 




180: 0340 


chrset 




$dOO0 




190:0340 


viccil 


= 


$d018 




200: 0340 


vicadr 


— 


£ddOO 




220:03^078 


y 


sei 




;no interrupts 


230: 0341 a9 33 




Ida 


*'51 


:disablei/o 


240:0343 85 01 




!>ta 


roiijcll 


¥ 


250: 0345 aO eO 




Idy 


*$eO 


jlimil for loop 


260: 0347 a2 00 




Jdx 


•0 




270;0349bd00d0 


loop 


Ida 


thrse ,x 




280: 034c 9d 00 cO 




sta 


chrram.x 




290: 034J e8 




inx 




I'l 


300: 0350 (10 f7 




bne 


luop 




310: 0352 ee 4b 03 




inc 


loop -^2 


;bijnip source 


320: 0355 ee 4e U3 




inc 


loop H- 5 


;bun]p destination 


330; 0358 cc 4b 03 




cpy 


loop -h 2 




340: 035b dO ec 


V 


bne 


loop 




360: 035d a9 37 


1 


Ida 


*55 


;put i/oback 


370:035f 85 01 




sta 


romcll 




380:0361 58 




Cll 




;allowinlerrLipts 


390:O3G2a9 20 




Ida 


*32 




4O0:O36'1Sdl8<10 




sta 


vicctl 


^point at ram 


410:03(^7 ay 04 




Ida 


B-4 




420; 0369 8d 00 dd 




sta 


vicadt 


;poinl vic2 alboc 


430: 036c a9 c8 




Ida 


"200 




440: U36e 8d 88 02 




sta 


basctl 


;[or basic 


450:0371 60 




lis 







4 h 



Basic Loader: charam iS> $3000. screen ® S0400 



6000forj-832to881 ; read x : ch-ch4-x 

tiOlOpokej, K : next 

6020 if ch<>5773 then print " data error ' ; slop 

6030prirt "fl" 
604U sys 832 
6050 return 

6060dala 120, 169. SI, 133, 1,160 
6070 data 224, 162. 0.189. 0.2U8 
6080 data 157, 0. 48.232,208,247 
6090 data 238, 75, 3.238, 78, 3 
6100dala204. 75. 3. 208. 236. 16^ 
eUOdala 55, 133, 1. 88, 109, 29 
6120 data 141, 24.208, 169, 7, 141 
6130data U.22M69, 4. 141,136 
6140 data 2. 96 
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Commodore 64 
Programmable 
Character Editor 



Paul Higginbotf om 
Toronto, Ont. 



Once you've relocated liie conienis of (he C54 character 
ROM info RAM, you'll probably want to start rpphcing the 
built-in characters with those of your own design. After all, 
isn'i that why you moved the character set in the firsl place? 

Von could start POKEing the new diaracier set locations 
(character base) with values that youVe calculated by add- 
ing up bits, etc. but that's a lol of work. Besides, if you hit 
one byte wrong, you'll end up allerinj^ Hit wroni^ part of the 
target character, or you could miss the target completely! 

This program eliminates Ihe work. After all, what are com- 
puters for? First it moves the character ROM into RAM. Line 
105 checks to see il this has been done so it only does it 
once. The new character set is plated at $3000. Vour BASIC 
program is now limited to about I OK. Any bigger and BASIC 
text will start overwriting your characters and you'll be 
typing in cosmic hyrogliphici. When the new character set 
is finished, you can save it to disk and load it back later, 

possibly to another memory space if the VK: II chip has been 
moved. 

First off, the program asks you to Select a character. This is 
mainly for convenience. If the charader you have ill mind 
resembles another character^ you can select that character 
as a starting "pattern". For a "dean slate'^ simply hit Return 
and the character selected defaults to a space. 

The character you selected will now be displayed nn an 8x8 
grid. Use the cursor keys to move around the grid. Cursor 
Home puts the cursor at the top left corner. To dear a dot or 
"pixel", hit space. To turn a pixel on. hit the '"" (period) key. 
To abort, hit Clear Screen and the "Select?" pruaipl will 
return. 

Once you're satisfied with the appedraiict? of your new 
character, hit Return. The program will now ask which 



character you wish to substitute or "Use" for the new 
character. This means you must give up one character to 
make room for the new. You can use any character includ- 
ing graphics or reverse field. To replace a reverse field 
character, hit CTRL and RVS ON, then type your choice and 
hit Return. The memoiy that holds the pattern for this 
character will now be overwriUen with the new pattern. 
Whenever this key is typed, you'll see the results of that 
replacement until it is modified again, or the machine is 
reset. If youVe inadvertently hit Return to enter the Use? 
prompt, hit Clear Screen and you will be allowed to do 
further edfting. 

Finally, when youVe through entering all the special charac- 
ters you need, get back to the "Select?" prompt and hit 
Home. After entering a filename, the program will store the 
contents of the R-^M based character set in a sequential disk 
file (if you have a disk) Only the non-reverse characters are 
stored. If you want the whole set filed, change the "2047'' in 
line flOIO to -1095. 

There is no provision in this program to retrieve these files, 
although it wouldn't be hard to add, , simply complement 
the save routme at 9U0U. But a lunciion like this would 
normally be found in another program that makes use of 
your new characters. \ utility for providing new character 

sets was the main purpose of this program. 

Fditor'ft Note 

Paul's program moves the ROM character set to RAM with a 
BASIC subroutine. While this is happening, your 64 will be 
pretty quiet. Be patient though, . . the first prompt will 
^pear shortly. However if you're the impatient type like 
me, replace the subroutine at line 6000 with Gord Camp- 
bell's machme language version. See the anicle on Moving 
the CG4 Character Set this issue. 
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100 vic= 13*4096 : c=3*4096 : sc ^ 1024 
105 if pcck{vic T 24)<>20 ihen gosub 6000 
110(ori=Oto7:m(i) = 21(7-i):h(i}=255-m(i):nexl 

l20z = c + 255*8:cl = sc+3MO4^15:dc=255 

200 gosub 500 

210 for i=0fo7 : p=peek(l + i) : poke 2 4 i, p 

220forj=0Eo7:aS-\" 

230 if p and m(j) then a$ = - Q - 

240 print a$; : next: print ■ next ; x = ;y = 

250 print 'H"; : poked, dc 

250 if y then (or i = 1 lo y : print : next 

270 if X then pnnl spc(x); 

280 p = sc + x + y*40 ; q = peek{p): r=q 

290r=(nolrandl28)or(noll2Sandr} 

300 poke p. r 

310!ori = l to 30 

315gera$:ifa$= "" then next : goto 290 

320 poke p,q 

330 if a$= "H* then x^(x-*- l)and7 : goto 250 

340 if aS = - [crsr Ift] " then x = (n- I )and7 : goto 250 

350 if aS= "^^ th&n y = (y+ l)ard7 : goto 250 

360if<i$ = 

370ifa$ = 

3S()ifa$ = 

390ifa$= 

395ifa$ = 




^*— 



1 



llieii y = (y-l)and7 : goto 250 
then pokep, 46:t=z + y : poke t, pcck(t) and h()() : x = (x-i- l)and7 : goto 250 
then poke p, 81 :t=z+y :poket. peek(l)'>rm(x): x = (x + ljand 7 : goto 250 
then 200 

lhenx = 0:y = 0: go(o250 
400 if a$< >fhrS(i:^)thpn 2.S0 
410prin[ 'DnBBnBnu:>e?'; 

411 rem important! above is crsr home, D cursor downs, u-s-e-? 
415 gosub600 : if a$= "({" thenprint: print "^ golo250 

417 primal; : if d$<Xhr$(13) then 4J0 , ■ 

420p = peek(1388):l=c+p*8 
44()fr>ri = 0tn7 :v(i)=0 

450fori=0to7:ifpet?k(sc + i»40+j)=81 then v(i)-v(i)+mO) , . . 

460 next j, i 

470 for 1 = to 7 :pokel + i, v{i) : next 

480 prim ' H " : pokt? 1 065, p : goto 200 

500 print ^Q^ -.Sclect?B"; 

505 gosub 600 : print a$ ^ " ; : if aS = '^ H " *^^n ^^^^ ^^^ ■ S^to 500 

506 if a$<>chr$(]3) Ihen 505 _ 

"^ ; treturn 



5l0p = peek(sc): ! = CH-p»8 ; print 
600gpia$'ifa5= " then 600 
610 return 

6000da=13'4096 + 12*256 
6010pokeda + 13J27 
6020 poke 1, peek(l)aiid 251 
6030oc = l3''4096 
6040 fori = Oro 256*8-1 

6050pokec+i. peek(oc + : next 

6060 poke l,peek(l)or4 

6070pokpna+n,255 

6080 poke vie + 24, 29 : return 

9000input 'Hnanic';f$:open2,8.2, "O:" +f$+ ',p.w' 

9010 for i=c to c + 2047 :prinl'2,chr$(peek(i));: next : clo^e 2 : return 
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Commodore 64 To 8023P 
Hi - Res Screen Dumper 



.1' 



David Berezowski 
Toronto, Ont. 



('.I ft 



if you're using your Commodore 64 lo make hi^h resolution 
pictures, graphs, charts, or othcnvise, this program will 
allow you lo dump screen contents lo a fommndnrp ^02!1P 
dot niairix printer. 

if you don't have a Commodore S4. the program will also 
wjrk uu PET/CBMs. Tliis way. if you gel your ftands on a 
disk file of a C64 hi-rcs screen, you loo can obtain a hard 
copy repro. 

The program is self documcnling, and although you need 
not type in all the instriiclions. I suggest you do as this will 
dvoid any pussible bUdfus lalt?r 

The madtine language portion is set up firsi. It starts at 
$1F00 whicli is jusJ 255 bytes bdow $2000, The machine 
code assumes that the C64 high res screen is (or was) set up 
at $2000, II you are going to be loading high res files from 
disk that were stored from a high leb screen at a different 
location, you may wanf to replace line 370 with a GOSUB lo 
a short loader subroutine: 



370flosublOOa *' J '- 

1000 open 8, 8, 8, fl$ 

1010 get*8. a$, a$ : rem discard start addr 

1020j = 0:sc = 8l92 

I030get'8, a$ 

1040 poke sc + i, asc{a$-*-chrS(0)) 
1050j = i + l 

1060 if St then close 8 : return 
1070 goto 1030 



Editor s [Note: 

Commodore's new 6400 and 1527 printers also have an 8x8 

dot matrtJt like the 8023P. The program has nol been tested 

on them but it will probably work with liftle or no modifica- 
tion. The only possible trouble spols I can see mighi lie in 
the OPEN commands to the printer in lines 380, 390. and 
■110. The secondary addresses may change for things like 
line spacing and programmable character accept. 



100 if c then 380 
110qS = chrS(34) 

120 print " • • c64 iii-res to 8023p dumper • * 

130 print "(david berezowski -303/82)' 

140 print " this program dumps the hi-res " 

150 print " screen of the commodore-6^ to ' 

160 print " a 8023p printer.' 

170 print " this program assnmps that: ' 

180priiJt " I) the lii-res page Is stored - 

190 print "as a program file on disk," 

200 print " with a load address of $2000 - 

210 prim " or" 

220 print ' 2) the hi-res page resides " 

230 print ^n memory from $2000 ro $:iFFF ' 

240 print " this program will work on any 



: print 



print 
print 

print 
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250 prim " pet, cbm. vie, or c64 system. " : print 

260 gosub 430 

270 prim " hit any key to continue " 

280geta$;ifa$="" (tien280 

290 prim 

300 input " 'exit or dump from 'd'isk or 'm'emory' ;x£ 

310 print 

320 il x$<> ^ d ' and \i<> ' e " and x$<> " m " then 300 

aSOifxS^'m" then 380 

340l[xJ="e" men end 

350 input "enter file nanrte '';flS 

360 prim : prinl ' loading file. . , " 

370c=l:loadfi$,SJ 

380 open 6,4. 6 :print-G,chr$(8) :dose6 
390 open 17, 4. 17 : open 18, 4. IS 
400 sys 7936 :remSlfOO 

4l0open 6.4. 6 :prim''G,chr$(l2). dosefi 
420 goto 290 

430ch=0:tori=7936to8182 : read x: poke j. x 
440ch=ch + x:nexl; if ch<>27502 then print 'data error 
450 return 

460daial65, 2. 72,165, 3. 72,162, 25 
470 data 142, 247. 31,162, 0,142.253. 31 
4gOda(al42.254, 31,162. 40.142,248. 31 
490dalal62. 0.142,251, 31.142,252, 31 
500datal62. 8,142,249. 31.162, 17. 32 
510dala201.255. 162, 0.142,255. 31.162 
520dala 8,142.250, 31.162. 0,134. 2 
530 data 162. 32.134. 3.165. 2, 24.174 
54Gda(a250. 31.125,238. 31,144. 2,230 
550data 3. 24,109,251, 31.144, 2.230 
5G0daIa 3. 24.109,253. 31,144. 2,230 
570dala 3.133, 2, 24.165, 3.109.252 
580data 31.109,254, 31.133. 3,162, 
590data161, 2,174,249. 31. 01,222. 31 
600dala240. 13.173.255. 31, 24,174,250 
610data 31.125,230, 31, HI, 255. 31,206 
620data250. 31,208,17&. 56,169,255,237 
630dala255. 31. 32,210.255.206,249, 31 
640data208. 152, 173,251, 31. 24.105. 8 
650datal44. 3,238,252. 31.141.251, 31 
660 data 206. 248. 31,240. 3. 76, 32. 31 
670 data 162, 18, 32,201.255.169. 13. 32 
680dala210.255, 32,204.255. 32.228,255 
690dala201. 3,240, 25.173.253, 31. 24 
700daial05. 64,144, 3.238.254. 31,141 
710data253. 31,238,254. 31,206.247. 31 
720data240. 3, 76, 19. 31. 32.231.255 
730dalal04. 133, 3,104,133. 2. 96. I 
740 data 2. 4. 8, 16. 32. 64, 128. 1 
750 data 2. 4. 8. 16. 32, 64,128. 7 
760 data 6, 5. 4, 3, 2. 1. 



:stop 
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VIC 20 / Commodore 64 
BASIC Line Labeling 



The program thai follows was originally presented in The 
Traa^clor by J Hoogstraat of Calgary, Alberta, back in 1979. 
Shortly aflerwards.Ciidrles A MtCarihy of Si. Paul, Minne- 
sota updaied the routine to eliminate some bugs and make il 
relocalable. Since Hien. a BASIC 4.0 version has been 
published and Gther chanijes have been made. Utilities 
come and go, but this one has been so popular amongst 
Traasaclor readers, Ihat versions for the VIC 20 and Com- 
iTiodore 64 were fell to be in order 

In Commodore BASIC, a GOTO, GOSUB. IF THEN/GOTO, 
er ON GOTO/GOSUB statement must be followed t)y a line 
number, a most unnatural way (o transfer e^iccution be- 
cause a line number is not a very descriptive about Jhe 
laTf^et code. Furthermore, if the program is re-numbered 
using a programmers aid (such as Dave Hook's Tiny-Aid for 
the 64, this issue), the line numbers change and the pro- 
yranmier must rernenibcr a whole new set of line numtiers 
to call frequently used subroutines and entry points. 

With ihis utility, line numbers can be replaced by "line 
labels". For example; 



GOTO 100 
GOSUB 500O0 
IFSTTHFN 10000 



migtU become GOTO &5TARr 

GOSUB &KE^ BOARD 
IF ST THEf^ &CLOSERLES 



Unlike a line number, a label offers the programmer a 
means of executing code by referencing a meaningful larget. 
Also, when a program Is re-numbered, the lines tliai use 

labels as the target are unaffected. The programmer can 
continue calling subroutines, etc, using rhe old line labels 
without regard for The new line nttmbers. 

+ 

Other language.s such as COMAL. PASCAL, and Waterloo 
BASIC discourage The use of line numbers altogether. Line 
labels arc used almost without exception. However, pro- 
grams written in these languages are only transportable to 
machiries thai have same language installed. This uriliiy 
gives Commodore BASIC users one oi the advantages of a 
structured language while maintaining the programs "ma- 
chine independence," 



But you say. ''that means this utility must be Included with 
the program before it will run on another machine". Al- 
though it certamly can be mcluded within a program, is was 
meant more as a development tool. When a program 
reaches lis final version, a "search and replace" utility 
would be used to substitute the labels back to their corres- 
ponding line numbers, 

Utiltty Utilization 

Probably the best way to demonstrate line labels is with two 

examples; one with labels, the other without. Some prelimi- 
nary explanation; 

First, (he utility does nor require excUjsive use of labels. Line 
numbers and line labels can be used at wilL 

Second, all labels must be preceded by an ampersand (8^ 
This routine links itself to BASIC via the CIIRGE-T subrou- 
tine in low RAM. (see yojr memory map) When CHRGET is 

called from ROM, a character is returned from BASIC text 

space that somehow gels manipulated by BASIC, If this 
character is an "Si\ and if it follows a GOTO, GOSUB, etc, 
the utility tatces over. Originally the label indicator was a "'" 
sign but was changed due to interference with commands 
such as GET* DCLOSE-. RECORD*, etc. 

Next, destinations can be labeled in a number of ways. The 
label can be on a line by itself or on the first line of code 
followed by a colon (see example). Labels must be a single 

word (ie no spaces, commas, or colons) but can t>e any 
length up to the maximum characters you can fit on a line. 
The label may even include embeftdi'if DAHIC keywords. 
But when referencing a label, the entire label must be used 
each time. Unlike variable names in CBM BASIC, all the 
characters musi match. If not. TUndef'd Slatement Error. 

Keep labels short in length if you intend to use multiple 
statement lines, and also to avoid exact spelling mismat- 
ches. 

Finally, the Commodore 64 version works with or without 
the RTC C64-Link which also patches into BASIC, If you 
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have another cartridge installed that inlerferes with BASIC 
(eg. VSP), chances are the Lililily will mailunclion. The VIC 
20 version also works with V-Unk. but it has only been 
l^led with SK of expansion RAM. However, Ihere should be 
no problem with other conhgurations, II there is. please 
inform us. 

Tectinica] Info 

As mentioned earlier, this utilit>' modifks the CHRGET 
siibroutmein low RAM. If another Lililily is in place thai also 
wedges into BASIC via CHRGET. it will be disabled when 
this one is POKEd in. Likewise, if another routine that 
modifies Cf-|RGET is brought in at some later hme. the 
l^>eling utility will be disabled by the new routine. 

AmorecontemporarymethodTolink this routine is through 

the New Basic Code Link (see memory map). This link is an 
indirect jump vector through which the Basic interpreter 
examines code. By re-routing it, like V-Llnk. new code can 
be added, special characters can be scanned for, etc. The 
labeling utility is actually linked "the old way". Although 

this Is not as efficient as the Baste Code Link method, it 

allows the routine to resemble more closely the previous 
versions. 

Some utilities link into BASIC via CHRGOT, Dave Hook's 
VIC 20/C64 Tiny-Aid works this way. Since the (wo utilities 
are modifying different parts of the CHKGtT subroutine, 



they allow for a very comfortable co-existence. Such a 
combination offers the luxury of both line labels AND 
ddditional editing commands, 

Note: If you search and replace the labels at some later time 
using Tiny-Aid, all of the occurences will get replaced 

including the one marking the entry point. Generally it's 
best to change Ihifispot before the search and replace. You'll 
either need lo delete the label or put a REM behind it. 

At the very beginning of the routine, program or direct 
mode is tested. The utlliry will abort if a GOTO &Label is 

issued directly from the keyboard. 

The code is entirely relocatable. This means that it will work 

no matter where it is set up in RAM. Since there are no 
internal JMRs, a simple BA.Sir relocating loader was chosen 
to establish the routine, which puts it directly underneath 
the Limit of Memory pointer. This also makes the utility 
compatible with other utilities that get placed in high RAM, 

Summary 

Referencing BASIC lines by a label as opposed to a number 
will make programming life a lot easier. Development time 
is reduced and silly mistakes are albeit eliminated, espe- 
cially in larger programs. Once you've written a program 
using the Basic Line Labeling utility, you'll wonder how you 
ever got by without it! 



Example Without Labels 



Same Example With Labels 



100 

no 

120 
ISO 
140 
150 
160 
170 
180 
190 
200 
210 
320 
230 
240 
250 
260 
270 
280 
290 



for i = I to 3 

on igosub ISO, 190.220 
next 

goto 250 

b 

rem 

print "subroutine 1 ':retum 

print "second subroutine 
return 

print "'three 
return 

a=0 

a = a+ I rprinl a 
ifa<10then260 

■ 

goto 1 00 



100 
110 
120 
130 

140 
150 
160 
170 
180 
190 
200 
210 
220 
230 
240 
250 
260 
270 
280 
290 



for i = 1 to 3 

on i gnsub foiibl , &two. Sonemore 

next 

golo &alldone 

&subl : rem label on own line 
print" subroutine I ' :return 

F 

&lwoiprint 'second label on linewith code 
return 

h 

Stonemore : print " * three has embedded basic + extra spcs 
return 

F 

&alldf>ne:a=0 

Anotyet :a=a + l : print a 

if a<10then&iiotyet 

goto 100 



1 
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900 rem c64 basic labeling utility 


900rem vic20basir labeling titilify ' " 




910 ad = peek(551 + pee k(5G)* 256-205 


910ad = peek{55)+peek(56)-256-205 




920 poke 55. ad-inl(ad/256)*256 


920 poke 55. ad-int(ad/256)*256 




930poke56.irt{a(]/256) 


930 poke 56. inHad/256) 




940[orj = adtoad + 205-l 


940 forj = dd to ad -1-205-1 




950 read x :pokei,x 


950 read x: pokej. x 




960ch = ch+x 


960ch^ch + x 


« 


970 next 


970 [lexl 




980 if ch<>25202 then print " data error " ;stop 


980ifch<>25331 Ihen print "data error" ;slop 




990 sys ad : print - svs " ;ad: ' to re-enable " 


990 sys ad: print "sys' :ad;'tnre-enat>le" 




1000 cir 


lOOOdr 




1010 data 169, 76,133,115.165, 55 


1010datal69. 76,133.115.165. 55 




lOZOdaia 24.105. 21, 133J16, 165 


1020data 24,105. 2M33.1]6. 165 




1030 data 56.105, 0, 133.117. 96 


lOaOddta 56, 105, 0. 133. 117, 96 




1040 data 76,227,168,230,122.208 


1040data 76,227.200.230.122,208 




1050 data 2.230,123, 138. 72,162 


lOSOdata 2.230,123.138, 72.162 




1060 data 255, 228, 58,240. 6,161 


1060 data 255, 228. 58,240, 6,161 




1070 data 123, 301. 38,240, 5.104 


1070data 123, 201. 38,240, 5.104 




1080daial70, 76, 121, 0, 104,170 


lOSOdata 170, 76.121. 0J04. 170 




I090dalal04,201,221,208, 4. 72 


I090data 104, 201.131,208, 4, 72 




llOOdata 76, 121. 0,201. 54.240 


llOOdata 76, 121, 0,201, 54,240 




lllOdata 29,201.210,240, 25.201 


1 110 data 29.201.237,240. 25.201 




1120 data 159, 240. 29,201.130.240 


_ 1120ddtal59, 240, 29,201.130,240 




1130data 28, 72,201, 97,208.121 


U30data 28, 72,201, 97.208.121 




1140daLal04, 104. 32, 115, 0.201 


1140datal04. 104, 32,115, 0,201 




11 50 data 44,208.249, 76, 87.169 


llSOdata 44,208.249. 76, 87.201 




1160daral65, 97,208, 4, 104. 76 


1160dalal65, 97.208. 4.104, 76 


- 


11 70 data 59, 169. 56, 176, 1. 24 


1170data 59,201, 56,176. K 24 




1180 data 104, 8. 165, 43,166. 44 


I180datal04. 3.165, 43,166, 44 




ll!*0datal60, 0,240, 4, 160. 


1190 data 160, 0,240. 4.160, 




1200 data 177, 95, 24,133, 95.105 


1200datal77, 95. 24.133, 95.105 




1210 data 4,133. 93,138,133. 96 


1210data 4, 133. 93,138.133, 90 




1220datal05, 0, 133, 94,200.177 


122Odatal05, 0.133, 94,200,177 




1230 data 95,240.139,170,136.177 


1230data 95,240.139.170.136.177 




1240data 93,240, 15,201, 58.240 


1240data 93,240. 15.201. 58.240 




1250 data 11,201, 32,240, 7.209 


1350dala 11.201. 32.240. 7,309 




1260 data 122, 208, 315, 200, 208. 237 


1260 data 122, 208.215. 200, 208, 237 


"- 


1270datal77, 122. 240, 12.201, 44 


1270datal77. 122,240, 12,201, 44 




1280da[a240, 8.201, 58,240, 4 


1280data240, 8,201, 58,240, 4 




1290data20], 32.208,196, 40,176 


1290dala201, 32,208,196, 40.176 




1300 data 21,165.123, 72,165,122 


1300data 21.165,123. 72.165,122 




1310data 72, 165, 58, 72,165. 57 


1310dala 72,165, 58. 72,165. 57 




1320 data 72, 169, 141, 72.169, 167 


1320dala 72,169.141, 72,169.199 




1330dala 72,169,173, 72, 32,197 


1330dflla 72. 169,173, 72. 32, 197 




1340 data 168, 32,248,168. 76,121 


1340 data 200. 32,248,200, 76, 121 




1350 data 


1350 data 
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Source Code Listing 

The source code bebw shorn a slan address of S033c. This is jiista dummy Start add^ 

assembler (remember, ihe machine codes arc POKRd in with a rebcator). The routine is actually too big lo fil at i033t so 
watch that yoiir assembler doesn't pui \i Ihere or il will clobber something for sure. 

The listing shown is for the Commodore €4 version. The VIC 20 source is identical except for a few addresses (as you might 
notice by comparing Ihe two loaders). Any addresses that change in the VIC version are shown in brackets. 



1 00: 033c 



= $033c ;duramy, do rol assmbi here 



120 
130 
140 
150 
160 
170 
180 
190 
200 
210 
220 
230 
240 
250 



033c aD 4c Ida "Uc 

n33e8.=5 73 sta S0073 

0340 a5 37 Ida $0037 

0342 18 dc 

0343fiR15 adc '?! 

0345 85 74 sia $0074 

0347 a5 38 Ida $0038 

0349 69 00 adc '00 

034b 85 75 sia $0075 

034d 60 rts 

034e4ce3aft imdefd jmp $a8e3 

0351 e6 7a entry inc $7a 

0353 dO 02 bne nohinc 

0355 e6 7b me $7h 



;sys here to link (AD in loader 



undef'd statement errorl$c8e3) 
perform TXTPTR inc 
for CI [RGET 



270; 0357 
280: 0358 
290. 0359 
300: 035b 
310:l]35d 
320; 035f 
330:0361 
340: 0363 

360: 0365 
370: 0366 
380: 0367 



8a 
48 
a2ff 
c4 3a 
f[) t)fi 
al 7b 
c9 26 
fO 05 

68 
aa 
Am 79 00 



nohinc 



exit 



txa 
pha 

Idx '$ff 
cpx $3a 
beq exit 
Ida ($7b.K) 
cmp'$26 
beq chklab 

pi a 
tax 
imp $0079 



;savc X 

:on stack 

;lest immediare mode 

;if so. exit 

:no, check for& 

;foiird, go test 
;no. restore .X 

; ret urn to basic 



400: 036a 68 chM^ 

410: 036b aa 

420: 036c 68 

430: 036d c9 dd 

440:036f d004 

450:037148 

460: 0372 4r 79 00 

470: 0375 c9 36 diklhn 

480: 0377 to Id 

490: 0379 f9 d2 

500: 037b fO 19 

510:037dc9 9f 

520:fl37f fO id 



pi a 
tax 

pi a 

cmp "Sdd 

bne chkthn 

pha 

jmp $0079 

cmp '536 

beq chkcond 

cmp *Sd2 

beq chkcond 

cmp 'EOf 

beq enlrl 



irestore X 

;pu]llo byr of calling addr 
iCM Link scan (^83) 
;no. goon 

;yes. ignore 

:basic 'then? 

;yes, chk condition 
;64-Link^lhen'?('$ed) 

;8olo? 

■ye^, go find transfer 
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530: 0381 c9 82 




rmp *$H2 


;gosub? 




540: 0383 to Ic 




beq edtrO 


;yes, go find 




550: 0385 •IS 




phc 


;lo byte to stack incase 




1 560: 0386 c9 61 




cmp *$61 


inolhing Jo do 




570: 0388 dO 79 




bne exit2 


;no. skip statement 




580: 038a 68 




plft 


;yes, do 'on' 




590: U:i8b 68 


+ 


pl& 


pull itn addr 




610: 038c 20 73 00 fndcom 


jsr SO073 


;advancc TXTPTR 




620: 038f c9 2c 




cmp '$2r 


:locomma 




* 630: 0391 dO 19 




but? fndojin 


;following label 




610:a393'1c57a9 


* 


jmp ia957 


;cont with on 




6G0. 0396d5 6l 


LlLkcuiid 


Idd J61 


;chk condition for if 




670: 0398 dO 04 




bne entri 


;true. go on 




680: 039a 68 




pla 


ifalse, pull rest of addr 




690: 039b 4c 3b a9 




jmp 5a93b 


;and bkipline 




700: 039e 38 


enlrl 


sec 


;carry flag set for golo/tticn 




710:0391 bOOl 




bcs eritrgo 


—^~ 




720:03dl 18 

f 


enlrO 

i 


ck 


;carry clr to remember gosub 




740: 03a2 68 


1 

enlrgo 


1 
pla 


;puli rest oladdr 




750: 03d3 08 




plip 


; to save Ldrry flai? 




760:O3a4a5 2b 


flabel 


Ida S2b 


;init basic txtptr lo 




770:O3a6a6 2c 




Idx J2r 


;search for line starting 




7S0: 03a8 aO 00 




kiy "$00 


:wilh &label 




790: 03aa fO 04 


« 


b€q srchln 


; forced branch 




810:03dca0 00 


■ 

itxstal 


Idy '$00 


;get pointer to 




820:03aebl5f 


* 


Ida ($50^ 


iprcscnt line in J5f 




840: 03bO 1 8 


srchtn 


ck 






S50;03bl85 5f 




sta S5f 






860:031)3 69 04 




adc '504 






870:03b585 5d 




sta S5d 






880: 03b7 8a 




txa 






890:03b885 60 




sta S60 






900:03baG9 00 




adc '$00 






910: 03bc 85 5e 




sta S5e 






920: 03be c8 




in/ 


:Y=I 




930:03bf bl 5f 




Ida (S5f),y 


;chk for null link, endprog 




940: 03cl fO 8b 




beq undefd 


;if so, label not found 




950: 03c3 aa 




tax 






960; 03c4 88 


■ 


dey 






980:03c5bl 5d 


1 

match 


Ida (i5d).y 


:test for&label terminator 




990: 03c7 fO Of 




beq fndtrm 


jniill?, eiidof line 




1000:03c9c9 3a 




cmp '$33 


jcolon, end of statement 


■ 


10lO:03cblC Ob 




beq tndtrm 






1020:03cdc9 20 




cmp '$20 


;space? 




1030: 03cf fO 07 




beq fndtrm 


:no terminator, test against 




I040:03dldl 7a 




cnip($7a).> 


:given &label - to next statement 




1050: 03d3 dO d7 




bne nxstal 


M not this one. Match so far 
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1060:03d5cB 


iny 


;iest next character 


1070:03d6dOed 


bne match 


;branch always 


9 

I090:03d8bl7a fndtrm Ida ($7a).y 


;foun(Jiermin, Ihis line 


nO0:O3dafO Oc 


bcq Irnsfrex 


;Iest given &labcl for termin. 


in0!O3dcc9 2c 


cmp "520 


itermjns, are null, cfimma. 


1120:03defO 08 


beq rrnsfrex 




n30:03e0c9 3a 


cmp "S3a 


icolon^ 


I140:03e2f0 04 


beq irn^^frex 




I150;03e4c9 20 


cmp 'S20 


; space 


1160:03c6dOc4 

It. 


bne nxsiat 


;no termin, try next line 


w 

I180:03e8 28 tmsfrex pip 


;ret:all ihen/i^oto vs. t|nsub 


Il90:03e9b0l5 


bcs nosub 


;set?, not a sub. 


12O0:03ehaS7b 


Ida $7b 


;clr^, put reliirn data on slack 


1210:03ed48 


pha 




1220:03eenS7a 


Ida S7a 




1230:03(0 48 


pha 




1240: 03n a5 3a 


Ida $3a 




1250: 03B 48 


pha 


b ■ 
1 


I260:03f4 a5 39 


Ida £39 




1270:0316 48 


pha 




1280:0317 a9 8d 


Ida 'SSd 




1290:03f9 4S 


pha 




1300: 03fa a9 a7 


Ida "Sa? 


i'icT) 


1310: 03fc 48 


pha 


*- 


1320:n3fd a9ad 


Ida *Sad 


^ 


1330: 03ff 48 


pha 





ll'.' 



1350:0400 20 c5 aS nosub jsr $a8c5 :sel newexecution($rft'.S) 



1370: 0403 20 f8 a8 exit2 
1380: 0406 4c 79 00 



jsr $a8f8 
imp ,$0079 



iskip rest of s(alemcn»($c8f8) 
;return tochrgnt 
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Tiny-Aid 

For The Commodore 64 



David A. Hook 
Barrie, Ont, 



Introduction 

■ 

Readers of (he Transactor (Volume 4, Issue I) and COM- 
PUTE! {'31 December 1982) may have roliced that Ihey 
rontainp<1 a VIC version of Jim Butterfield's Tiny Aid for 
PET. In answer to popular (Jemand, but mainly because I 

finally gol my Commodore64, here is the further adaptation 
for our favourite company's newest wunderkind. 

Although 1 realise memory size is not a serious problem on 
the C64, there are still only a few of Ihe "complete 4K" 
Basic-Aid features that I use frequently. In keeping with the 
original spirit of Tiny Aid, you won't find much different in 
this package. 

Never let it be said that we are standing still, however. You 
will note that this one does have an APPEND command, 
whicli workft with eiitier tape or disk. (It Is not a MERGE, so 
you will have to do your own housekeeping with proper 
staging of line number sequences). 

For your program editing satisfaction, I present to you 
C64 TINY AID. 



Features 

C64 TINY AID is a machine language program which con- 
sumes about 1 177 bytes of your RAM memory. Alter you 
have loaded the prot^ram, type RUN" and hit <RETl.'RN>, 
The program automatically repacks itself into high memory. 
It goes in at the current top of memory, and will peacefully 
co-exlsf with any other programs above it. The appropriate 
memory pointers arc set so that Basic will not clobber it. 
Cti4 TINY AID is now alive. 

Once activated, the six commands become attached to 
Basic. They will function only in "direct'' mode. i.e. don't 
include them in a proi^ram. 



0) NUMBER 1000,5 
NUMBER 100.10 



<RETURN> 



Renumbers a Basic prw^iam with a given starling line 
numt>er and given increment l>elween line numbers. The 
maximum increment is 255. 



All line number references after GOTO, THEN, GOSUB and 
RUN are automalically corrected. A dis|>lay of these refer- 
enced lines is presented on the screen as the command does 
its thing. Ifyou have a GOTO which refers to a non-existeni 
line number in your profiram. then it is changed to 65.S3S. 
This is an illegal line number, aud must be corrected before 
the Basic program is used. 



(2) DELETE 1 00-200 
DELETE -1500 
DELETE 5199- 



<RETURN> 



Deletes a range of lines from a Basic program. Uses the same 
syntax as the LIST command, so any line-range may be 
specified for removal DELETE with no range vvill perform 
like a NEWoDmmand. so be careful. 



(3) FIND /PRINT/ <RETURN> 

FIND/A$/, 150-670 

, nND "PRINT', 2000- 

FIND''62050*, -3110 

Will locale any occurences of the characters between the 
special marks called ■■delimllers"\ Almost any character may 
be used to identify the start and the end o[ the "string" to be 
found, so long as both are the same. The first example will 
find all the PRINT inslructions in the program. 

This "search string" is tokenized by the routine, which 
means you need to be careful if you are looking for a string 
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of rexl which contains a Bask "keyworcl". Fnr example, you 
could be looking for the word PRlfST' as part of a teM 
message, ie. in quotes. The rhird example above shows how 
to do this. Sometimes those ke^'\\'ords can hide on you, so it 

may be worthwtiile to search using both kinds ot siart/end 

markers. 

You can perform a search that is limited to a cenain line 
range. Just specify the starting and ending line numbers as 
you would with a LIST command Three examples ahove 
demonstrate Ihis. Please note that a comma must separate 
the end-marker from tlic line range. 

All lines containinij the string are printed to the screen. If a 
line has more than one of them, each occurence will cause a 
repetition of that line on the screen. 



<RRTLIRN> 



(4| CHANGE -PRINT-PRINT'4,- 
CHANGE /ABC/XYZ/, GOOO- 
CHANGE/DS$/DI$/,-5000 
CHANGE 'BOB^CAROL* 



Usingthe same syntax as FIND, you may change any string 
to any olher string in a Basic program. This command is 

ver>' powerful, and was not part of the early versions of 
Basic-Aid or Toolkit. I use this one quite often. 

As before, you may indicate a line-range. As the chani^es 
are made, the revised lines arc displayed on the screen* 

Watch o\}\ for the difference between Basic keywords and 
strings oi text wiihin quotes. You may use the quote charac- 
ters to differentiate, as with FIND. 

The first example shows how to change all the PRINT 
statements to address Ihem to ancrfher device, perhaps a 
printer. Notice that the comma at the end of llie "PRINT*" Is 
inside the end market. This will result in a SYNT\X ERROR 
if the PRINT was being used to do a blank line, so all such 
lines need lo be ctiansied back manually. Us your choice as 

to which works best with your programming style. 



apppnrt ^ Rastr program to the end of the one currently in 
memory. 

Several cautions are in order here. First, this is not a true 
MERGEnas the [lew proi^rarn just attaches itself lu the end uf 
the one already there. Secondly, no check is made lo see if 
tfie one in memory is "Basic-only". Thirdly, no check is 
made on iheinconiingune to see if it is Basic either. Finally, 
i1 assumes you arc big boys and girls and wont attempt lo 
APPEND programs that have lower line numbers than the 
residejil pmi^rani. All bets areojf if you do these naughty 
things! 

After all these caveats, wlial is It good for? Yui may have a 
series of subroutines stored on disk or tape which are used 
frequently (a bullet-proof input routine or a number Inrmal- 
ting routine are two exdiiiples). Rather than having to LOAD 
tiicm in first, you can bring them in after you've got 
underway with your programming. It was considered to be 
worthwhile by the persoji who asked rne lo tiidude it in Ihis 
version. 



(5} KILL 



<RETURN> 



This command disables C64 TINY AID and its associated 
commands, A syntax error will be the result if any of the 
above commands are now tried. 

Since the routine is safe from interference from Basic, you 
may leave it active for as long as your machine stays on. It is 
possible that C64 TINY AID may irilerli:re with olliet pro- 
grams that modify Basic's internal "CHRGOT routine. The 
KILL rnmmand allows you lo avoid Itiis coiifkci. 



Procedure - - 

The C61 contains no internal machine language monitor, 
which is the most efficient way to enter ihis pri^ram. "ihere 
are several options for you. depending on the state of your 
program library: 



1 always do a Fli^D before attempting the CHANGE, just to (I) If yoj have access loan Upgrade (2.0) or Basic 4.0 PET/ 
sec the potential mess I'm about to create. CBM, it has an internai ML monitor, Thi.s will work quite 

well. 



(5) APPEND "filename", 1 
APPEND -l:filename\8 



<RETURN> 



This is the new kid on the block, as mentioned above. Either 
tape or disk may be used as the source. The second example 
refers to drive *1 of a dual drive system. !ts function is to 



(2) Use your C64, but you must have a machine language 
monitor or something thai does the same ]ob: 

-JimButterfield"sSUPERMON64V!(Compute*32Jana- 

ary I9H:J). 

-Jim Butterfield's TINY PEEKER/POKER (same article} 
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which I have (very slightly) modified in Ihisartirle, 

(3) The way of the PasI Office. Send $3, a blank cassette or 
1541/2031/4040 diskette in a stamped, self-addressed 
mailer to me at: 



58 Steel Street 

BARRIE, Ontario, CANADA 

im 2E9 

Be sure it's packaged stfcurely. Diskettes will be returned ir 
DOS 2,0 format, [fyou have a 15-10/1 5'1I/2031 LP/oranold 
2040 (whicli still has DOS l.O) you should not SAVE or 
WRITE to ihe diskette you gel from rue. Prepare a diskette 
thai you formatted on your own drive, LOAD the program 
into memory, msert your other disk ard SAVE it. When 
you've have a VERIFYed cop>. re-furmal ifie original disk 
for your own re-use. This caution is worthwhile because the 
■low-profile ■ drives are not "WRlTE-compalible" with the 
other IEEE drives from Ihe PET/CBM equipment. You 
should be able to "READ^ the SAVEd programs OK. 

By the way, I cannot use U.S. ur other hmgu postai^tr tc 
return your tape/disk- You would be amazed to learn the 
number of people who just lollowed my ^"orders" with Ihe 
VIC 20 TINY AID blindly. Can anyone use $350 worth of 
American stamps, some in rather shabby condition? 

If you're still with me, you are about to undertake the enlry 
of about 3300 characters worth of hexadecimal numbers. As 
welt as the digits Irom zero to nine, you will need the 
alphabetk characters from A-F to represent numbers from 
ten to fifteen. These characters, and three instructions, will 
bt all itiai are used to enter our program. As I've olten said 
before, just follow the in si ructions— it won't be the first 
computer- related thing you may not fully Lindersland! But 
you can make it work without totally knowing the effect. 

The alternative, a Basic loader with DATA statements, would 
be four limes as much typing and would require as much 
"messing about" in the end anyway. 

From this point on. we'll take different paths. I hope we ail 
can gel back together for the finale: 

A. WittiaPET/CBM: 

Start with a fresh ly-powered-up machine. We first need to 
move the 5 tart -of- Basic Pointer lo match the Commodore 
64's- Type in the following instructions, (without using line 
numbers): 



Now rype in the Basic prc^ram tislini? that appears with this 
article. Much of it represents internal documenfalion on 
how the commands work, so don't leave i( out. The informa- 
tion will fit on the screen without losing any by scrolling, so 
type it in exactly, and don't add anything extra either. 

Perform a normal Basic SAVE to your tape or disk, and 

VERIFi' i! TOO. Call it "064 AID.BAS", Type 'NEW' to clear 
the program. That was pretty easy stuff. 

We need to enter the ML monitor now. so type in: SY52048 
and hit <RETURN>- There will be a display on the screen, 
which you may ignore if you don't understand monitors. 
Below this you can see the cursor flashmg next to a period 
character ("/'). The period is like a prompt character in the 
ML scheme of things. Starting at the current cursor position, 
enter; 



.M098009F8 



<RETURN> 



Sixtccnlincsof stuff should appear on the screen, much like 
the "memory-dump" which accompanies this article, A 

iouf-dti^ii quantity called an "address " leads off a line, and 

eight pairs of tv^'o-digii values appear alongside. 

Look at the tables of values in the article. The first ''block" 
has the address "0980", which matches the first address just 
above The last row of this same table shows "09F8'\ (This 
same process wilt be repeated for each of the eleven tables 
given, ic- using the first and last 'addresses" of each table). 

You need to enter the values given, typing right over the 
values shown on the screen. Hit <RETURN> at the end o( 
each 'line" or else nothing will get remembered- Double 
check the values yoj've typed. Ii's not easy to find an error 
later on. 

Look at Ihe next block of values. Type in the start/end 
addresses to display: 



-MOAOO0A78 



<RETUR>J> 



POKE 2048, : POKE 41.8: NEW 



< RETURN > 



Continue until all eleven tables' worth have been entered. 

Now wc need to save this stuff before anything goes wrong. 
To do this, we need the ML Monitor SAVE command as 
shown below: 

.S ■C64AlD.ML\0l,0980,OFOO <RETURN> (tape) 
-S '0:C64A1D,ML",08,0980,OFOO <RETURN> (disk) 

Mount a tape or disk, and follow the instructions. Save a 
second copy, for safety. UNDER NO CONDITIONS SHOULD 
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YOU SAVR RVR N ONE EXTRA BYTE! 



here after you've SAVEd and VERIFYed " C61 AID.BAS " . 



E;iil ihc ML monitor, with: 



.X 



<RETURN> 



Rewind the rape, if applicable, and VERIFY Ihe program 
norm ally before i^oinftanv lurther. 



You should now resel the niathitie a^diii to start wall the 
memory wiped clean. Now we need lo make some room to 
store our code where Basic would normally waiil lo find \\. 
Type: 



POKES!92,0:POKE4'1.32.NEW 



<RETIJR\> 



Go to the section tilled Check-Out, so that the ML part can 
l>e verified before we go any hirltier. Come bacit here when 
Ihc checksum is OK. 

TVpe 'NEW, then LOAD the "C64 AID.BAS". Follow this 
immediately with a LOAD of '064 AID.ML". This sels Ihe 
Basic pointers properly so a normal SAVE command will gel 
both pieces properly. SAVE this as "Cfi^ AID.REL^ and 
VERIFY it loo. 

Now proceed to the section on Final Checking. 

B. C64 with Supemion64* 

Again, it's best to start wi(h a machme thaJ's been turned off 
and back on again. LOAD and RUN the Supermon64 pro- 
gram first. You must type "X" (and <RETURN>) to exit the 
monitor for now, and then type 'NEW lo erase Supermon. 

Refer back lo the instructions in Pan A, slartitig AFTER Ihe 
line with the POKE statements, You can follow these direc- 
tions all the way down to the paragraph starting: 'Type 

NEW, then LOAD...". Since the C64 does a little trick 
called "program relocation'', you need to place the ML part 
back info the right spoL 

Do the Basic LOAD as given above br "C64 AID.BAS \ 
Then you need to enter: 

LOAD T64AID,MLM,1 <RETLRN> (tape) 
LOAD ^C64AID.ML",8J <RETLRN> (disk) 

Now you may do the normal Basic SAVE as '€64 AID,REL" 
and VERIFY it. The Basic and machine language have been 
linked together and will now LOAD as one piece. 

Now proceed lo the section on Final Checking. 

C. C64 with no ML monitor; 

Let's start afresh by turning off the C64 and turning it back 
on again. Now is a good lime to type in the Basic portion of 
tile program, as given in Che article. Refer back to Pari A 
(after the POKE line) for directions on this, and come back 



Thanks lo Mr. Butterfield we have a "one line editor" which 
is really a poor man's machine language monitor. His TINY 
PEEKER/POKER was published lo ease the burden for 
people trying to get SUPERMON64 into their Cfi4. Even if 
that project was not attempted, the program can rnme in 
handy for ifiis task. Either drag out your copy, oi consult the 
enclosed listing. My changes were as follows: Ihe variable 
'T' was changed lo "Tl ' in lines 300. :J30 and A'M)\ line H)5 
was added, and line 210 wds dropped. Tliese changes were 
made so that it will provide a running total of the checksum 
which may help to confirm your work as you go along. 

ReSAVE the PEEKER program if you wish, but we need this 
in memory for Ihe next step. 

RUN the program, and in answer to the INPUT prompt, you 
should enter "0980" which is the first line in Ihe enclosed 
tables of hexadecimal values. Continue the eulry by typing 
the other values on the line (using the same spacing shown), 
then hit <RETURN> to gel the ne;(l prompL You then lyj>e 
the "address'^ and ^'dala" fiuin the second line of the Uibi 
table. After the sixteen lines have been done, copy down The 
number shown as Ihe ^'checksum^'. This will come in handy 
later on. 

m 

I would recommend that you then exit the program (type 
"•■■ after the prompt) and then RUN it again for edtli uf tiie 
eleven data blocks. This will reset the checksum counter to 
zero each lime so you can compare ihe values that appear 
later In the article. 

After all Ihedata is in place, we need to do the following very 

carefully, so pay close altenlioii and DO NOT turn off your 
machine yet: 

The checking of the MLcod^? is d little nioit involved. Ijian 
ideal case, you got everything right using Ihe PEEKER and 
your eleven checksums agree perfectly with the DATA 
values given in tlieClieck-Oul section below. This Ls highly 
unlikely because the checksum counter would get messed 
up if you had lo re-enter a line in a block ol tode. Some of 
the blocks could be OK. 

Go to the Check-Oul section, which will require you forget 
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[he PEEKER program, by typing ^^LW^' belore you enler the 
checksum program. Note the incorrect blocks, because you 
will have (o reLOAD (he PEEKER to check and change the 
erroneous bytes, l"hen back to Itie Ctieck-Out until i!"s 
finally correct. No one promised that our li[iy nionilur Wds 
going to be the ideal way! 

Now. uith ail OK, let's gel Ihe starl-of-Bdbic back where il 
belongs. Type: 



PO!?B 2048, : POKE 44, 8 : NEW 



<RETURN> 



Now LUAiilntlie "C64AID-BAS' program trom earlier. In 
orderloincludethecodeweVePOKEUin. we have to adjust 
a few other memory' pointers. Do this by typing: 



POKE 45, ; POKE 46. ! 5 : CLR 



<RETURN> 



Final Checking 

All three methods should converge \o this spot for the acid 
lest. As usual start with a clear machine before you 
LOAD ■ CG4 AID.REL" , RUN il and the screen should clear, 
and your Basic program with all the neat documentation 

(you didn't leave out the credits, did you'/} will do its ttiing, 

Thecursorshou.d return below thy "READY." message. If il 
doesn't, promise yourself never to undertake such an eiforl 

oi^aJn fur one cruinm> |;rogrdiit. 

Try out a few of Ihe commands on the program in memory. 
Don't do APPEND, since we know lliere s ML c\;de hiding 
after Basic. If it seems to work fme, then congratulations are 

in order- Call your best friend and tx)re him silly with your 

success story. 



A normaJ Basic SAVE will unite the Iwo pieces. Call it " C64 
AID.REL" and VERIFY ai leasl OEte copy. 

Uo to the section on Fmal Checking. 



For the unfortunate few whcse program doesn't work, you 
can still send me a tape ot disk, following the instructions 
^ven before. If you wish, send along the non-working copy, 
and I'll try to find (heerror(s). 



Check-Out 

The following propram can be entered to provide some 
confirmation that you have got the ML portion right. SAVE 
this one too: 

10 1 = 0: fori- 2432 to 3839: t-l-*-peek(i): neM: print I 

:iUt = U:lori=tifolU:s=2432 + i*l2b 

301 = 0: lor i= sto s-i- 127: t = l + peek(jj: next j 

40 read c: if c = t then 60 

50 pnnt - block " :i -*- 1 : " wrong, loial = " :l 

60 next i 

70 data 14S66, 17673, 14097J5530, 15344,14312 

80 data 16881. 15633, 13974. 14760. 15154 

When RUN, the first number sihown should be 167924, 
wtiich (s the sum ol all bytes in the program. Each block of 
1 28 bytes is then summed Individually and compared to the 
correct value from the DATA statements. Any incorrect 

block total IS identified by number and ils total is also 
printed. 

Chances are that at least one correction will be required, so 
you will have to re-enter the monitor (or reLOAD the 
PEEKER program) to find the errors. When the detective 
uurk IS complete, dont forget to reSAVt the machine 
languai;e code, using the appropriate instructions for the 
method ycu ve been using. 

Now go back lo the place where you came from. 



When VIC, MD was published, I got a few letters from people 
who told me that you can use abbreviations, just like with 

Basic keywords, to minimize the typing. Since C64 AID 
works the same way. in forcing Ihe machine to examine its 
commands hrsl. oE course we can do ihe same thing. It you 

don't know about the *'short-form" of Basic ke>-words, the 
manual that comes with the VIC or C64 has a table of them 
Suffice It to say that we veteran PETters have been lazy since 
the day we found them. 

The Commodore 64 is a very hne machine, 1 hope you find 
the added commands useful m your programming efforts 



Tiny-Aid 64: BASIC Portion 

1 print '^B ' tab(l 4) ~Bc64 hny an 

2 print " adapted for c64 by: davjd a. hook 

4 pnnt "Hfrom 'tiny aid' by: jim buJIerfield 

6 print "Hand 'basic aid' by: bill seller 

8 print ' H " Iat>( 1 2) " J sample commands: 

9 print ''Bchange/?/prinl'4./ 
IOpnnt'Bjind.gosub..200- 

11 print "Hdeiele 130-625 

12 prinl^Hnumtjer 100,5 

13 prinfHappend "chrS(34)"name "chrl(34rp [device 




'1 - 

14 print "Hkill 

15 sys(peek(43}+ peek(44)'256 - 383) 
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70 rem j. buiterfield —compute! jan 'S3 




400primchr$(v3&+48): 




80 rem dightJ)' modified by d.a. hook 




410nexlj 




90r6masofapnl3/83 




420 next i 




100 print "Imypeeket/poker"' 




430 print VMI 




105 t = 




440gotu 110 




110x5= '■" : input x$ : if x$= '•' (hen end 




500 p=l 




120gosub500 




5101 = 4 




130 if e then 280 




520 gulu COO 


^ 


140 a = v 




550 p-i 


^ 


150if j>len[x$)then30U 




5601 = 2 




I60fori-0to7 




C00e = 




170p = j:gosub550 




6l0v = 




180c(i) = v 




ti20lori = pto]en(x$) 




190 if e then 280 




{J30x = a5c(ni[d$(xS.j)) 




200 next i 




610 if x = 32 then next j 




220 ori = 0lo7 




650ifj>len(xS)lhen790 




230 poke a + i,c(ij 




GGOp = j 




240l = l+c(i) -f 


t 


670 for j-plo len(x$) 




250 next i 




680x = asc(mid$(xSJ)) 




200 print " checksum == ' it 




C90ifx<>32t]iejii»exti 




270 goto HO 




7O0if]-p<>[then79O 




280 print mid${xS,l, !);■''?'■ : goto 110 




710fork = ptoj-l 




300 1-0 




720x = asc(niid$(x3.k)) 




310 for i = to 7 




730ifx<58thenx = >t-48 




320v = p€ek(a + i) 




740ilx>64thenx = x-55 




330tl=tUv 




750ifx<0crx>15lhen790 




340v = v/16 




760V-V-16 + X 




350 print " "; 




770 nexi k 




360 for 1=1 to 2 




780 relurn 




370v9fi=v 




790e = -l 




380v = |v-v%)*16 




800 return 


' 


390ifv%>9lhenv%=v%4-7 




■_ * 

r 1- 




,:0980 a5 2d 85 22 aS 2e 85 23 


;0a00 


fO 03 4c eb it 00 a9 c9 




B , 


;09S8 a5 37 85 24 a5 38 85 25 


:0a08 


85 7c a9 3a 85 7d ay t^ 




1 


:0900 aO 00 a5 22 dO 02 c6 23 


,0al0 


85 7e 60 85 8b 8G 97 ba 




n 

* 


;0998 c6 22 bl 22 dO 3c a5 22 


;0al8 


bd 01 01 cd fc ff 00 fO 




»■ 


:09a0 dO 02 c6 23 c6 22 bl 22 


:0a20 


10 dO 02 a4 8c a6 97 a5 




W 


;09a8 fO 21 85 2G a3 22 dO 02 


,0rl?fl 


3b c9 3a bO 03 4c 80 00 




* 


;09bO c6 23 c6 22 bl 22 18 65 


: Oa30 00 60 bd 02 01 cd fd H 




w 


: 09bS 24 aa a5 26 65 25 48 a5 


:0a38 


00 do ec a5 8b 10 02 e6 




*' 


:09c0 37 dO 02 c6 38 cG 37 68 


:0a40 


7a 84 8c a2 00 00 80 d5 




* 


:09c8 91 37 8a 48 aS 37 dO 02 


:0a48 


ca e8 a4 7a b9 00 00 02 




» 


;09d0 c6 38 c6 37 68 91 37 18 


:0a50 


38 fd a6 ff 00 fO 13 c9 




m 


: 09d8 90 66 c9 bf dO ed a5 37 


;0a58 


80 fO 13 eG a5 e8 bd a5 




¥ 


: 09eO 85 33 aS 38 ^ 34 6c 37 


:0a60 


ff 00 10 fa bd a6 ff 00 




* 


; 09eS 00 aa aa bf a9 4c 85 7c 


: 0a68 dO e4 [0 be e8 c8 dO eO 




¥ 


; 09f0 ad fe ft 00 ^ 7d ad R 


:0a70 


84 7a aS a5 Oa aa bd tS 




¥ 


: 0918 a 00 85 7e 4c 40 fc 00 


:0a78 


ff 00 48 bd c7 ff 00 48 
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.:()a80 21) 99 fb 00 4c 73 00 00 


■ OcOO f6 32 c8 dO f2 84 7a 60 


:0d80 fO be 10 e9 a2 04 dd al 


.: Oa88 20 63 fd 00 a5 5f a6 60 


:0cOfi c9 ab fO 04 c9 2d dO 01 


:0d88 ff 00 fO 05 ra dO IR 10 


.:0a90 85 2-1 86 25 20 dO ff 00 


;0cl0 60 4c eb ff 00 90 05 fO 


; 0d90 dd a5 7a 85 3b a5 7b 85 


.:Oa98 a5 5f a6 60 90 Oa aO 01 


:0cl8 03 20 57 fd 00 20 e2 ff 


:0d98 3c 20 73 00 00 bO d3 20 


.:0aa0 bl 5f fO 04 aa 88 bl 5f 


: Oc20 00 20 d9 11 00 20 79 00 


: OdaO e2 ff 00 20 04 ff fMl a5 


.:0aa8 85 7a 86 7b aS 24 38 e5 


: 0c28 00 fO Ob 20 57 fd 00 20 


: Oda8 3c 85 7b a5 3b 85 7a aO 


.:OabO 7a aa a5 25 e5 7b a8 bO 


' 0c30 73 00 00 20 e2 ff 00 dO 


: OdbO 00 00 a2 00 00 bd 00 00 


,:0ab8 It? 8a 18 65 2d 85 2d 98 


;0c38 eO a5 14 05 15 dO 06 a9 


:0db8 01 c9 30 90 11 48 20 73 


.:OacO 65 2e 85 2e aO 00 00 bl 


:0c40 ff 85 14 85 15 60 20 7d 


: OdcO 00 00 90 03 20 35 ff 00 


.:0ac8 7a 91 24 c8 dO f9 e6 7b 


;0c48 ff 00 85 43 20 7d ff 00 


:0dc8 68 aO 00 00 91 7a eS dO 


.:OadO e6 25 aS 2e c5 25 bO ef 


; 0c50 85 44 38 a5 14 e5 43 a5 


: OddO e8 20 73 00 00 bO 08 2{) 


,:0ad8 20 d3 ff 00 aS 22 a6 23 


:0c58 15 eS 44 60 a5 7a 85 22 


: Odd8 44 ff 00 20 79 00 00 90 


.:0ae0 18 69 02 85 2d 90 01 eS 


: 0c60 a5 7b 85 23 a5 2d 85 24 


: OdeO f8 c9 2c fO b8 dO 96 20 


.:0at8 86 2e 20 dc ff 00 6c 02 


; 0c68 aS 2e 8^ 25 60 a5 22 c5 


: OdeS 5f ff 00 20 7d ff 00 2i] 


.:OafO aO 20 d6 ff 00 20 73 00 


: 0c70 24 dO 04 a5 23 c5 25 60 


: OdfO 7d ff 00 dO 08 a9 ff 35 


.:()a(S 00 85 8b a2 00 00 86 49 


: Oc78 a4 Ob c8 bl 22 a4 97 c8 


: OdfS 63 85 62 30 Oe 20 7d ff 


.:0b00 20 3d fd 00 a5 aS r9 00 


:0c80 91 22 20 b2 fd 00 dO 01 


:0€O0 00 c5 14 dO Of 20 7d ff 


.:0b08 00 dO 07 a2 02 86 49 20 


; 0c88 60 e6 22 dO ec e6 23 dO 


:0eOS OU c5 15 dO Ob 20 fl ff 


-:0b]0 3d fd 00 20 73 00 00 fO 


:0c90 c8 a4 Ob bl 24 a4 97 91 


lOelO 00 a9 20 4c d2 ff 20 7d 


.:Ubl8 03 2U e8 If 00 20 63 fd 


:0c98 24 20 b2 fd 00 dO 01 60 


:0el8 ff 00206aff 00f0d3 


.;0b20 00 d5 5f d6 60 85 7a 86 


: OcaO a5 24 dO 02 c6 25 c6 24 


: Oe20 20 55 ff 00 e6 97 20 d5 


.;tt>28 7b 20 e5 ff 00 dO Ot> c8 


: 0ca8 4c d5 fd 00 aO 00 00 64 


: 0e28 fd 00 e6 2d dO 02 e6 2e 


.:0b30 98 IS 65 7a 85 7a 90 02 


: OcbO a5 84 Of 20 ee ff 00 a9 


: 0e30 60 20 55 ff 00 c6 97 20 


.:Ob38 e6 Tb 20 7d ff 00 fO 05 


: 0cb8 20 a4 a5 29 7f 20 d2 ff 


: Oe38 bd fd 00 a5 2d dO 02 c6 


,:0b40 20 8d fd 00 bO 03 4c 40 


: OccO cO 22 dO 06 a5 Of 49 ff 


. Oe40 2e c6 2d 60 20 al fd 00 


.;0b48 Ic 00 84 55 e6 55 a4 55 


;0cc8 85 Of c8 bl 5f fO 19 10 


: 0e48 aO 00 00 84 Ob 84 97 60 


..ObSO aG 31 d5 32 85 8b bl 7a 


: OcdO ec c9 ff fO e8 24 Of 30 


: Oe50 a5 35 85 63 a5 36 85 62 


.:Ob58 fO dS dd 00 00 02 dO ed 


: OcdS e4 84 aS 20 2d fe 00 c8 


:0e58 4c df ff OO a5 63 IS 65 


.:0b50 e8 c8 c6 8b dO fl 88 84 


:0ceO bl ae 30 d6 20 d2 ff dO 


: OeSO 33 85 63 a5 62 65 34 85 


.:0b68 Ob 84 97 a5 49 fO 5b 20 


: 0ce8 f6 20 e5 ff 00 38 60 ac 


: Oe68 62 20 7d fl 00 dO fb 60 


.:0b70 al fd 00 a5 34 38 c5 32 


: OcfO fa ff 00 84 ae ac fb ff 


: 0e70 aO 00 00 eG 7a dO 02 e6 


.:Ob78 85 a? fU 28 c8 fO ca bl 


; OcfS 00 84 af 38 e9 7f aa aO 


: 0e78 7b bl 7a 60 a9 00 00 85 


4 

.:0b80 7a dO 19 18 98 65 a7 c9 


; OdOO 00 00 CA fO ec e6 ae dO 


: 0e80 Oa 20 f4 ff 00 38 a5 2d 


.;0b88 02 90 40 c9 4b bO 3c a5 


:0d08 02 e6 af bl ae 10 f6 30 


: OeSS e9 02 aa a5 2e e9 00 00 


.:0b90 a7 10 02 c6 8b 18 65 Ob 


lOdIO fl 20 c2 ff 00 a5 U 85 


; OeOO a8 a5 Oa 20 d5 ff 4c f7 


,:0b98 85 97 bU 05 20 d5 fd 00 


:0dl8 35 a5 15 85 36 20 e8 ff 


: 0e98 ff 00 89 8a 8d a7 43 48 


.;0bd0 fO 03 20 bd fd 00 a5 97 


;0d20 00 20 e2 ff 00 a5 14 85 


:0ea0 4! 4e 47 c5 44 45 4c 45 


.:0ba8 38 e5 34 a8 c8 aS 34 fO 


;0d28 33 a5 15 85 34 20 df ft 


: OeaS 54 c5 46 49 4e c4 4b 49 


.:ObbU Of 85 8c a6 33 bd 00 iW) 


; 0d30 00 20 7d ff 00 20 7d ff ,: 


; OebO 4c cc 4e 55 4d 42 45 d2 


.:0bb8 02 91 7a e8 c8 c6 8c dO 


;0d38 00 dO 21 20 5f ff 00 20 


:0eb8 41 50 50 45 4e c4 00 00 


.:ObcO (5 18 a5 2d 65 a7 85 2d 


; Od40 7d ff 00 20 7d ff 00 dO .; 


; OecO 56 fc 00 f2 fb 00 56 fc 


.:0bc8 a5 2e 65 8b 85 2e a5 7a 


: 0d48 03 4c 40 fr 00 20 7d ff ,; 


; 0ec8 00 77 fb 00 4b fe 00 87 


.:ObdO a6 7b 85 5f 86 60 a6 43 


;0d50 00 aS 63 91 7a 20 7d ff 


: OedO ff 00 4c 33 a5 4c 7c a5 


.:0bd8 a5 14 20 ee fd 00 20 cl 


:0d58 00 a5 62 91 7a 20 6a ff 


:0ed8 4c 13 a6 4c 59 a6 4c 8e 


.:ObeU 11 ay 00 00 85 c6 a4 97 


: 0d60 00 10 e2 20 7d if 00 20 


OeeO a6 4c 6b a9 4c d7 aa 4c 


.;0be8 4c a3 k 00 a4 7a c8 94 


;0d68 7d ff 00 20 7d ff 00 c9 


: OeeS fd ae 4c 08 af 4c cd bd 


.:0bf0 31 a9 00 00 95 32 b9 00 


;0d70 22 do Ob 20 7d ff 00 fO 


OefO 4c dl bd 4c d4 tl 4c 95 


.:0bf8 00 02 m 15 c5 8b tU 05 


;Ud78 c5 c9 22 dO f7 fO ee aa 

4 


■OefS el 9d aO 8c a4 8a fb 00 

4 
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1982 Commodore Bibliography 



Don White 
Ottawa, Ont. 



Looking for an article but don't know where to start? Don 
White of the Ottawa Commodore Users Group has compiled 
the following bibliotiraphy of Commodore related artirlf^s 
published in 1982 issues of Creative Computing, Kilotjaud 
MICROCOMPUTING and COMPUTE!. These arc three of 
Ihe more popular mags on micros and although Ihey may 
not have back copies for sale» your local computer club 
might be able to help you find a particular issue if youVe in a 

bind. Ed. 



Creative Computing 

January 

42 Five for the VIC-20 - Brief reviews of Car Chase. 
Slither, Super Slither, Casino-Slyle Bldckiack. Blue 
Meanies From Outer Space, and Biorhythm Compati- 
bility 
1 26 Big Numbers and Small Computers - Program to simu- 
late a calculator that can add. subtract, multiply, divide 
and raise to a power integers of up lo 1024 decimal 
digits. 

February 

36 Neu Graphics Horizons For The PET - Review of 
MTU's Visible Memory Board, 

58 More On VIC Graptiics - Brief description of VIC 
graphics capabilities, 

148 Graphics Conversion For The TRS-80. Apple, and PET 
- Information teearding the grapfiirs capabilities of the 
3 computers and ways of cuLJverlinij Biapliits roulines. 

200 Personal Electronic Transactions - Educalional Pro- 
grams by Uon Ross; Prc^rams by Teaching Tools; BSR 
Wars Continued 

ApriJ 

186 Data Without Duplicates - Routine to allow random 
selection of data statements. 

May 

118 AutohexPEEK/POKE-A program to convert machine 
lEingLjage programs into Basic DATA statements. 

June 

1 82 Maze Race - Two-player car rare for the PFT. " 
222 Personal Electronic Transactions - 2020 vs 4040; Basic 
3.0 vs. Basic 4.0; lEEE-488 Extcnsipn Card; XDOS by 
Prominiro; The +20 ROM; Hex !o Decimal Infinitum; 
TheNuckdrPET 



July 

162 Screensaver - Program thai permits drawing or print- 
ing on ihe screen, saving the screen in DATA sfale- 
mcnts and finally, returning the onglnal sireen, 

208 Persrjnal Electronic Transactions - Cheapskate disk 

liter; Uncopyable Tapes: A reasonable (lET routine; the 

Pedisk II; The User Port Workshop; a[i Eclectic ROM - 
FasU-r Basic; The PIC Chip, 

August 

171 Drnids: A strategy Game for the PET ^An educational 

game for up to 4 players, 

236 Personal Electronic Transactions - Some VIC Modifica- 
tions; IINSAM; Fixing Flaky Diskettes; An 8050 Disk 
Bug; VIC and the Frying Pan; Entry Routine for Musical 
Chords. 

September 

212 Personal Electronic Transactions -Two little programs 
for a printer; Benchmark Programs, The Pelspeed 
Compiler; A Quick and Dirty Program: PET/CBM ba- 
sic. 

October 

M Math For Older Students- Review of Factoring Whole 
Numbers. 

298 Personal Electronic Transactions - PetChess: PET 
Nuke Rx; CP/M for the PET; VIC Bits; The Single Di^k 
Glitch; DiscSavers; A Write Protect Trick, Asteroidz and 

Munchman: Pakjana; Filemaster; A Yeech Program. 



November 

294 Personal Electronic Transactions - Programming the 
PET/CBM; VIC Revealed; Nine Ways to Write a Pro- 
gram Languages for the PET; PET/CBM Basic; Comal 
Petspeed Compiler; Oxiord Integer Basic Compiler 
KMMM Pascal; Forth; RPL; Vigil; 6502 Assembler 
Atxjut Adventure and FRP Games; Dungeon of Death 

Pagoda; Explore; Dunjonquest; Micro Warrior 
SwordQuest; Death Star, 

December 

326 A Scrolling Routine for CBM/PET Output Listings - 

Routine allo\^s scrolling oJ output from a program. " 
396 Personal Electronic Transactions - VIC Product Guide 
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Kilobaud MICROCOMPimNG 

January 

9 PKT-Hourri - iiU-Column Adapter, Formatted disk files 
from WordPro; VIC jump vectors; Disk-To-Tape Data 
File Copy, 

102 A Computer/ Video Disk Combo That Really Works - 
Interfacing a PET to d Pioneer video disk plaver. 

132 The Revealing Truth About PET\s Memory - A BASIC 
text disassembler. 

146 Putting PET To Tlie Test - Adaptation of Cook^s mem- 
ory test for the 6502, 

2t)6' Klasti Attack - A review ol a multimachine war game. 

February 

lU PET-Pourri - Reverse Polish Language (KPL), 

March 

12 PET-Pourri - DTACK Grounded: Multipurpose Inter- 
fact; EHS's Scroll; ViC Budgel. 

April 

12 PET-Pourri - VIC-1540 Disk, Input Bug; Basic Aid; 
Micromon; ATUG; WordPro Quit, 

May 

12 PET-Pourri - UCSD Pascal; VIC Programmers Refer- 
ence Guide: leach YourseK Programming Series; 
Home Calculaljon Stx-Pack; VIC Cartridge Games; 
VfCModem; VIC Memory Expansion; New Machines; 
Winctiester Disks, VIC ttt-2:i2 Notes; WordPro Word 
Counter. 

June 

12 PET-Pourri' Programming Th(?VIC-20. 
56 Disk Master - Disk cataloguitig program. 

July 

14 PET-Pourri - WordPro Splitter; Wordcraft Utility; Mew 

VlC-20:wtlware:Misc. 

August 

13 PET-Pourri - Hescouni: Mescal; Hescom; Commodore 
News; Educational Software; MibC. 

AA Fowl Ray - Using PET computers to study animal 
behaviour. 

September 

ft PEl-Pourri - STCP. Hex Dump: Misc. 
38 Black Friday - A stock markel simulation for one to 

four players. 
100 Dueling Joysticks - Add two more joysticks to your 

VIC-20. 
1 04 The Game Room : Invaders, Pac-Man Games Predomi- 
nate - A review ol various arcade games including 
SnaknidnforlheVIC-20 



October 

20 PET Pourri - Commodore News; On Line Software; 

Misc. 
32 What You Didn't Know About NEC Splnwriter - Using 

a PET/CBM and RPL to plot on a NEC Spinwrilcr. 
88 Squeeze The Most Out Of Your VIC-20 - Use the colour 

dot and high- resolution capabilities to generate super 

game graphics 
152 Conversions "11" - "Color Code Combo" converted for 

the PET 

November 

19 PET-Pourri - Time Is Money; PET Graphics; Misc. 
12 Micros Find A Place Under The Sun - CBM 8032 U3ed 

to collect and analyse data on the efficienc)' and usage 

of hot water solar systems. 

December 

26 PET-Pourri - Disk Tips; Disk Master Additions: HES 

Software For The ViC: Newsletters 
*M] MrcroSoftware Dige,si-Solicube. 
74 A Big Boost For First-Time Users - A review of the 

VIC-20, 
118 Conversions - A converaon of "Micro Money Maker" 

for the PET/CBM, 

173 The ARROW - A review a utility package in EPROM 
that provides high speed save, load, verify and append 
with cassette, tape positioning, repeat-key fundion. 
charact[?r set flip, hexadecimal mode, and quadruple 
density plotting, 

COMPLTEI 

January 

14 Ask The Readers- Note On Chaining Prcgrams. 

54 Anti-Hesitation Programming ; A Tutorial On Arrays - 

A discussion of programmimg methods to speed up 

execution of programs. 
144 Renumbering An Appended Routine Only - Using 

Toolkit to renumlser an appended routine, 
1 46 BRANCH NEVER And QUIF Assembling On SuperPET 

- A discussion ol the 6809 Assembler on the SuperPET. 
150 PETKepairs For The Amateur- l.oose connections and 

dirty contacts are the most frequent source of problems 

on early PETs. 
152 Realtime Clock On Your PET Screen - A machine 

language routine to continuously display the time on 

the PET screen. (Upgrade & 4.0) 
ISC Tape Load Test And Head Alignment - Hnw in prepare 

and a use a special test [ape for the cassette recorder of 

anyPET/CBM. 
160 MicroMon - An Enhanced language Monitor - Ma- 

cliiiie language monitor including a simple assembler. 

disassembler compare, hunt, transfer relocates single 

step and various other options. 

174 Self-Modifying Programs In BASIC - How to write 
self-modifj'ing programs. 
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176 TinvMon: A Simpie Monitor For The VIC- A monitor 
which displays the registers, displays memory, saves 
and loads programs and execules a program. 

1 80 VIC Color Tips - A discussion of using color on the VIC. 

181 VIC Memory Map Above Page Zero - More BuUcrficld 
memory maps. 

183 ZAP!! - A VIC game for up to 6 players witti 5 rounds 

per player, 
186 CAPUTEl - Compute! '17, pg. 143; Compute! *'17. pg. 

152- 

February 

28 Insurance lnvenlor\' - A pro£?ram To maintain an in- 
ventory of personal possessions on cassette 

36 Creating A Simple Word Processor - A word processor 
program in BASIC for the PET/CBM. 

^A Transposition - Some simple routines to demonstrate 
the transposition oJ music on the PET Uses CB2 sound 

52 Some Common Basic Prot^rams - A book review. 

54 Multilaak ; A Realtime Multitasking Operating System 
Emulator - A Basic program to demonstrate multitask- 
ingon a PET 

128 A User-Defined Character Editor - A program for 
creating a user-defined character set for use with a 
printer having the capability of printing user-defined 
characters, 

135 Marquee - A machine language routine that will con- 
tinually scroti text hoizonially on (he PET/CBfvl screen. 

145 Disk Disassembler - This program disassembles code 
from a file on disk and dumps the output to a prinler. 

154 Line Input For The PET - A machine language routine 
to add a LINPUT command to the PET. 

160 Measure Time Intervals With The PET Parallel Ron - A 
machine language routine that can be used to measure 
7 successive small time intervals to the nearest 1/ 
10000 s, 

166 Screen Pro -A review of a screen utility package. 

168 Extended VIC-'20 Input Devices : Paddles And The 
Keyboard - A discussion □( ttie VIC-20 paddles and 
keytKjard with examples. 

173 Timekeeping - Using the Tl and TI$ variables on the 
VIC. 

176 An Easy Way To Relocate VIC Programs On Other 
Commodore Computers - Two mcthids of easily relo- 
cating VIC programs. 

177 UMI Amok For VIC -A game review. 

178 UMl 3K VIC Memory Exapansion - A hardware re\iew. 

179 Alphabeli^er - A simple sorting routine. 

181 CAPUTE! - The Unwedi^e; Bits, Bytes And Basic Boole; 
Assembler Update; Inversion Partitioning. 

183 New Products - Board Offers 24K Additional Memory 
For VIC; TYCOM Introduces 3 Additional Educational 
Packiigcs(Algcbra Word Problems, Spanish, German!; 
Multi-Purpose Interface For PET/CBM; From Krell 
Software Corp.(War Of The Samutai. Alexander The 
Great, Isaac Newton, Fig Newton, Odyssey In Time). 



March 

12 Ask The Readers - Odds And Ends; VIC-20 Tips. 

62 Infinite Precision Multiply - An mflnile precision mulii- 

plyjng routine in B,ASIC. 
6S Word Hunt - A game to find specific word or letter 

sequences in a 10 by 11) matrix. 
78 Count The Hearts - A program to help develop a child's 

counting ability, (VIC) 
88 h'amily : A Simulation In Genetics - A program lo 

demonstrate the effects of gene selection. 
104 Large Alphabet For The VIC - A short routine to 

display double-size alphabet on the VIC. 
112 StarfighlS-SiartrekforlheVlC. 
1 17 Webs - A one-player game for a 40-column PET 
1 20 RPU - A FORTH Sequel - A brief description of Reverse 

Polish Lanf^uai^e from Samurai Software, 
139 Parti . Disk Checkout For 2040, 40-10, And 8050 Disks 
- An explanation of disk manipulations via machine 

languat^. 

152 Dynamic Renumber - A Basic utility to renumber a 
selected range of linas. 

168 More VIC Maps - Buiterfield's memory maps for the 
VIC, 

182 Random Music Composition On The PET- A program 
to let the PET compose and play music. 

194 Basic ^.0 To Upgrade Conversion Kit -A discussion on 
converting Basic 4.0 programs to Upgrade ROM. 

209 New Products - VIC-20 Timesharing With Printout; 
Scratchpad Mailing List: VicModem. 

222 CAPUTE! - Spacewar Part 2; PET To PET Communica- 
tions Over The User Port; Tinymonl . 

April 

12 AskTlie Readers -Simple Word Processor; Tape Index 

Program; Self-Modifying Programs. 
26 Moving Averages - A program to calculate moving 

averages. 

34 Track Down Those Memory Bugs - A sophisticated 

machine language memory testmg program. 
50 Shooting Slars - A ^orl game for the PET/CBM. 
70 Grading Exams On A Microcomputer - v\ program to 

assist in grading exams. 
84 Using The VIC Game Paddles - A tutorial on how the 
game paddles work on a VIC-20 illustrated by the 
game, BreiikouL 
98 Micros With The Handicapped - Communicating with 
a micro, 
1 [)0 Using The PET/t:BM In The High School Physics Lab - 
Programs which allow you to measure fietjuencies or 
time inter\'ais in microseconds using photolran^iisior^; 
and a PET/CBM. 
108 Intelligent Input Routines - Routines Ihal try lo correct 

faulty user input. 
122 Machine Language : Jump To ll - On using Jump 

Tables. 
126 PETASCII To ASCII Conversion - A machine language 
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roLiTinc to convert PETASCfl lo ASCII (PET/CBM) 
135 Odd^ Ancf Ends - The Bug In The Universal Wedge; 

Improving The Toolkit'^ TKACt Kunclion, 
I -12 Browsing The VIC Chip - An explanaTion of the 6560/ 

6561 registers with experimenis. (V!Q 

1 55 Exiendinii MAE - How lo adii custom pseudo-ops. 

1 56 Part II : Disk Checkoui For 2040, 4040, And 8050 Disks 
- A program to perform quality checks on disks and 
recover scratched disks 

174 A High Resolution Digital-To-Analog Converter For 
The PET - The necessary hardware and software lo do 
*D-to-A convLTsions on the PET. 

179 The "Branding Iron" EPROM Programmer For The 
PET/CBM - A review. 

181 VIXEL -1 - A review ol the lirst VIC three-in-one 
packi^e from The Code Works. 

182 CAPLiTE! - VJC : Ahernale Screens; MICROMON; 
Timekeeping, 

183 New Products - Educalional Aids For The Classroom, 
Understanding Your V[C From TIS; Use Graphics And 
Sound For Blackjack Program; Multi-purpose Interface 
For CBMs; Communication And Cataloging Now For 
CBM: PET Terminal Emulator: Symtec Lght Pen For 
The Atari And VIC; Software For Elementary Students; 
Programs For The Classroom, Disks And New Educa- 
tional Programs From Teacher's Pet Software, 

May 

12 Ask The Readers - A User-Defined Character Editor; 

Commodore -1040 Drives; VIC-2Q Tape Drives: Bullel- 

prooi INPUT; VIC-20 Manual Correction. 
32 Life Insurance Estimator - Analyse your life insurance 

needs. (PET/VIC) 
^2 Sonr>e Speculation On The Well-Pnagrammed Game - 

An approach to good programming and development 

of a simple game, 
52 A New Technique For Mixing Basic And Machine 

Language - On reserving a 249^byte or 2739-byle 

block of memorv in your Basic program for machine 

language. (PET/VlC) 
63 Modem Driver Module [MDM-1] - A review of the 

MDM-1 interface to connect a VlC-20 to a modem and 

a short Basic driver program. 
78 The Joystick Connection : Meteor Maze - An action 

game program illustrating how lo use joysticks with the 

VIC-20. 
98 Amortize - An amortization program with an INPUT 

technique allowiriR the input of expressions as well as 

numbers. (ViC) 
1 10 Machine Language : First Steps : Part I - Developing a 
machine language program to draw bar graphs on the 
screen, (PET/CBM) 

135 Recovering From NEW On Apple And CBM - How to 

reset some pointers and recover from NEW. (PtT/ 
CBM) 

136 Putting The Scjueeze On Your VIC-20 : Getting The 



Most Out Of 5000 Bytes - How to reduce the size of 
yoLir programs. 

156 Screen Input On The PET - A series of experiments 
iHustraiini^ how to avoid "garbage collection" delays 
when working with prc-Basic 4.0 PETsandCDMs. 

ItO Fast Sort For PET/CBM - A machine language sorting 
utility thai can be used with tape or disk. (PET/CBM - 
Upgrade &1.[)) 

170 Handicapped Programming - A program that prints 
messages on the screen and allows the user to move a 
pointer lo the desired word and enter H into the 
computer (PET with graphics keyboard) 

175 New Products - VtC-20 Programmers Reference 
Guide; WordPro 5+ and WordPro 2 + ; Hayden An- 
nounces Computer Literacy Package; VidCom 
Anounces Product To Interact With VTR. 

188 CAPUTE!- RcnumbcringAn Appended Routine Only; 
Starlights. 

r 

June 

10 Ask 1"he Readers- Keyprini: VIC-TTV Interface 

20 Income Property Report - Prepare Information from 

income property for yearly (axes. 
30 Outpost - A slategy game for any Commodore com- 
puter, 
A3 Search For PET And Apple II Plus - A routine to 

provide a Search utiiity. (PET/CBM - Upgrade & 4.0) 
46 A VIC Intdligeni Video Disk System - Interface and 

software lo control the Pioneer VP tOOO Laser Disk 

with a VIC-20. 
52 Some Similarities Between Applesoft and PET Basic - 

A commentary on the case of converting PET and 

Apple programs with some examples. 
79 Using Atari Joysticks With Your VIC - An explanlion 

on using the joystick with the VIC and a sample 

drawing program. Doodle. 

87 PET Miscellany - Jim Butierfield responds to a number 
of queries about Commodore computers. 

88 Bits And Pieces -Elizabeth Deal provides informations 
concerningCommodore machines. 

89 PET Newsletters And Magazines - A list of worthwhile 
publications. 

94 Micnjs With The Handicapped : Developing A Com- 
munications Program : Part I] - A menu-communica- 
tor for Apple, PET and VIC computers. 
1 04 VIC-20 Canridge Games - A review of Jupiter Lander, 
Super Alien. VIC Avenger, Draw Poker and Super Slot, 

107 HardboxKorPET/CBM-Revipw 

108 Beyond Games : Systems Software For Your 6502 
Personal Computer - Book review. 

119 Hooking Up DOS Wedge To PETs With POWER ^ A 
procedure that allows the use of DOS support and/ or 
Universal Wedge on Upgrade PETs equipped with the 
PCJWEKchip. 

1 28 ViC/FET Basic Program Transfers - A few methods for 
loading Basic VIC programs into a PET, 
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133 Machine Language ; First Stq^s, Part II - Converting a 
bar graph program irom Basic lo machine language, 

139 Run 96K Programs On The SuperHtT - How to use all 
96Kon the SuperPET from Commodore Basic. 

144 A Simple 3716 EPROM Programmer For The PET - 

Hardware and software required lo burn 27l6's With a 
PET 

151 VlC's Perpetual Calendar - A perpetual calendar pro- 
gram for the VIC. 

158 Basic Program Merges : PET And VIC - Routines to 
merge programs on PETs. CBMs and VICs. 

175 Niw Products -SoJibox. HardBox and Petspeed Com- 
piler; Graphics Package For The VIC-20. 
190 CAPUTE! - Micromon 

July 

6 The Editor's Notes - A Brief Over\-i€w Of The Chicago 

Consumer Qectronics :^how And INational Computer 

Conference In Houston, 
12 Ask The Readers - Basic To Basic; VIC Fast-Find; 

Hidden Advetiture: VJC Expansion Software. 
23 The Beginner's Page : Making Files Work - Some 

specific details about file handling. 
27 Gold Rush! - An exciting action game requiring a 

joystick. (VIC) 
34 IRA Planner - Compule your IRA account(U.S.). (PET/ 

CBM/VIC) 
40 Maze Race - A one or two player maze game. 
58 Recursive Basic Subroutines -A simple game illustrat- 
ing the concept ot recursive subroutmes. 
68 Screen Graphics - How lo move and relate ot^ecls on 

the screen. 
84 Answer Selection With Joysticks - A program to illus- 

trale the useoUhe joystick to input responses. (VIC) 
94 Computing Techniques For The Handicapped - A 

quadriplegic describes techniques he has learned lo 

effectively work with his PET 

96 Multidigit Addition - A program to allow you to add 
ver}' large numbers. 

97 A Direct Access File Editor - A disk file editing pro- 
gram, (PET/CBM - Updated 1.0) 

112 Whither VIC? - Butterfield discusses VIC software. 

add-ons, aiid VlC's place in Ihe world ol computing. 
116 Super QuadraPET - A Basic 4.0 update of QuadraPET. 

a program to partition the memory ot a U2K PET into 

four 8K areas. (PET/CBM - 4.0) 
130 All About PET/CBM Character Sets. 
144 VIC Super Expander Memor>' Map - A map of the 

significant routines in the VIC Super Expander, 
150 Part [[l : Machine Language : First Steps 
154 How To Use The fi5*i() Video Interface Chip -Technical 

details on the 6560 VIC. 

159 Machine Language Compactor - A routine to compact 
Uasic programs. (PKT/CBM - Upgrade & 4.1) - disk) 

184 Two Programs Frurii The VIC 6 Pack - Reviews ol Car 
Chase and Blue Meanics From Outer Space. 



185 SoftBox-CP/M For PET/CBM - Review. 
1S6 SYSRES For PET/CBM - Review ol Ihe SYSRBS pro- 
grammer s aid package. 

190 CAPUTE! - Further Notes on Fast Son For PFT/CRM. 

191 New Products - Disk-0-Mate For COM Disk Drives, 
Budget II From RAK Electronics; Plug In BCD For PET 
Computers; New Educational Microcomputer Litera- 
ture From Commodore: Promquccn Cartidgc For 
VIC'20; The VIC Enters The World Of Radiocommuni- 
cations. 

August 

10 Ask The Readers - VIC Upgrades; Recover From NEW 
on VIC; SuperPET Users Croup; VIC SuperExpander 
Hints; VIC Zenith Jitters. 

18 The New Wave Of Home Computers - Hii^hlii^hts on 
theCESand f^CC shows. 

!i9 Household Budget Manager - A personal budget pro- 
gram, (PET/VIC) 

S'l WordGames- A program iKat creates several different 

word games on a printer. 
60 A First Look At Tlie Commodore 64 - Part 1 of a review 

of the features and capabilities ol the 64, 
84 Guess That Animal! Simulating Ijearning In Computers 

- A demonstration of how a computer can "learn". 
93 Two VIC Word Processing Programs - A review ol 

Un-Word Processor and A VIC Typewriter. 

99 VIC Cummunicaiions : The RS-232 Interface - On 
interfacing RS-232 modems lo your VIC. 

U):i The Keyprint Compendium - 14 versionsof Keyprinl. 

107 Screen Saver - A Basic routine to transfer screen 
images to disk and back to the screen. 

1 39 PET Aulo Repeat - A repeal-key roiiline. (PET - 1 .0 & 
Upgrade) 

1 40 VIC Curiosities - Cold Start by SYS 64802; One-handed 
KUN: LIST killer; SAVE killer. 

141 A Light Pen For Under $10- How to construct a litjit 
pen for Ihe VIC-20, 

1 53 Electnc Eraser - A routine to delete instructions from a 
program after they are no lonf^er needed. (VIC/PET/ 
CBM- Upgraded 4.0) 

1 58 Inner Basic - An explanation of what Basic looks like to 

your PET and VIC and how to send text to a printer 

from machine language. 
lt>0 Copy 20',]] Files - A file copying program for the 

Commodore 2031 disk drive. (PET/CBM - Upgrade & 

4,0) 
I 64 VlC-Key - A rnuiinp which allows the user to assign 

Key-words to each shifted alphabetic key. 
175 New Products - Commodore 8300P Printer; File II for 

PET and VIC 

I 

September 

10 Ask The Readers - 1-owercase on Comprint; PET to 

Epson; A New VIC Champion; VIC Lser Groups, 

28 Peripheral Vision Exerciser - Aid in improving and 
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iTunntalnins^^mareadlni; skills. 

30 Uscr-dcfincd Functioas : Defined - An in-depih expla- 
nalion of Ihe DEF FN command. 

45 Meet Jim Butterfieid - He discusses ihe future of com- 
puling, his background and hobbies, and his views on 
topics ranging from computers in education to ihe 
appea! of programming. 

56 Banish INPUT Statements! - Some suggestions and 
substitutions lor Basic^s INPUT statement. 

74 Student Mark Adiustment - A set of programs to calcu- 
late accurate adjustments- 

78 -^he Inside World OJ The Computer : The Talking Head 
- A program to create a "talking? head" on ttie computer 
screen. 

92 The Statistics Page : Accurate Statistical Calculations - 
A method for achieving statistical accuracy on micro- 
computer systems 
101 FlexFile : A PET Data Base Manager -- Review 

106 Sprite Graphics And Sound Synthesis On The Commo- 
dore 64 - Part 2 of an overview of Ihe 64 with game 
programming examples, 

1 1 1 PET Pointer Son - A fast, effective sort that operates on 
DATA statements or arravs, (PET/CBM - Upgrade & 
4 0) 

1 27 PET Autoload - A routine to automat ically LOAD and 

RUN any program selected from the directory. (COM) 
132 $20 VIC Digitizer - Construct a digitizer that works 

through the VIC game port. 
136 On-The-Spot Comnodote Disk Fixes - Emergency 

procedure when disk problems occur. 
1 39 VIC Sticks - A routine for using jovsticks with rtie VIC. 
15D VIC Pause - A routine to allo^^ pausing of a program 

listing. 

164 A VIC Bug - Suggestions for overcoming the problem 
with the VIC INPUT statement, 

166 Three PET Innovations - Routines to display bolh 
character sets simultaneously, hide PRINT statements 
and generate a flashing cursor with the GET statement, 

174 PET Machine language Delete - A routine to allow 
deleting of ranges of lines in PET programs. (PET/CBM 
-Upgraded 10) 

196 CAPI ITF' - PRT Compactor. 

201 New Products - Ponmaker Prom Microtech; Commo- 
dore Bulletin Board; Two VIC Games From Computer- 
Mart (Alien Invasion Snakeoiit): Professional Sohware 

For Commodore Machines (\VordPro-ML, WordPro- 

-Mail Ust. InfoPro, The Administratorl; Disk Based 
Data Manager for VIC-20; Plotting Routine For VIC 



44 MeteorStorm-Navigaieyourstarship through oncom- 
ing meteors. (PET/CBM) 

50 Rubik's Cube Solved - Program to solve the infamous 
cubestep-bv-slep- (PET/CBM) 

6S Siiperchase - Try to eat all the treasures before the 
monster eats you. (5K VIC) 

72 Mathman - Game that leaches math. (VIC) 

76 T\G - Play tag against the computer. (PET/CBM - 
Upgraded 4.0) 

86 Laser Barrage - Defend your energy pods against the 
15 amok robots. (PET/CBM) 

124 MicrosWiihThe Handicapped -VIC game demonstrat- 
ing how the motor- impaired can communicate using 
only the button on a joystick. 

132 Four New Cartridges For VlC-20 - Review of Om^ 
Race, Gorf, Sargon II Chess and Visible Solar System. 

136 CURSOR . Issues 23 Through 28 - ClassifitaiioLi gf 
CURSOR programs for educational purposes. 

139 PET Fun And Games -Book review. 

141 Pixelator - Programs to design custom characters for 

VIC. 
150 Commodore 64 Memory Map "'^ 

156 The VIC Keyboard Redefined - With this short program 

you can make any key on the keyboard represent any 

other key. 
162 Pack Up Your DATA - PaiM^ data in order to save 

space in sequential files. (PET/CBM/VIC) 

164 PET Tape Head Alignment - Method of aligning tape 

heads by listening to the signal, 
170 PET Self-Starting Programs - Bootfixer routine to 

make any program loaded from disk selt-starling. 
173 ViC Joystick And Keyboard Routine -Gaming routines 

to help speed up Basic. 

193 Digital Speech - Technique to store and plav digitized 

speech. (PET/CBM - Upgrade & 4.0) 
1% VIC Ringer - Adding an end-of-line bell to the VIC. 

201 Is Anyone Open? - Utility to avoid the problem of 

improperly CLOSEd PET/CBM files. 
204 Sorting By Fields - This ripple sort will sort records 
using any internal locations as its key. (PET/CBM/VIC) 

21 1 CAPUTE! - .Machine Language: First Steps, VIC Curios- 
ities. 

215 New Products - Expansion Chassis For VIC: Publica- 
tions From K-12 MicroMedia; Software For Gifted And 
Taleriled Students; Contest Marks Merger: VlAC:The 

VIC Interface To Any Cassette; Grades Management 

System For Teachers; Commodore Announces Bilin- 
gual Keyboard For Microcomputers. 



October 

10 Asi< The Readers- Bullerfii^ld Or RS-232 Interfacing. 
32 Wrinng Your First Game - Programming the old card 

game 'High Card'. 
36 Programming dames On Computers With Limited 

Memory - SutKesiions for pro^rammlni^ on the VIC 

and other small computers. 



November 

14 A^k The Readers - Color For VIC Gold Miner; A VIC 
Taping Mystery Solved; VIC Superexpander Graphics: 
SupcrPET Users Groups; Running 40'Column Pro- 
grams On The PET/CBM. 

44 Laser Gunner : Basic Animation - Arcade stvle game- 
.(PET- Upgrade & 4.0) 



Tha Transactor 



7a 



ApHll^aa 



S6 UXH - Defuse bombs wiihotil Irippinga minf. (VIC) 
74 VJC Harmony - Teach your ViC lo sing in 3-pari 

harmony. 
78 Rainbow Dork - Make VIC screen a digital clock. 
30 SlalJsliciaii - Learn and examine slatislii:s. 
90 Part 1 : How To Use SYS And USR - Introduction to SYS 

and passing informalion between Basir and machine 

laiLgudge. 
10^ VisiCalc Home And Office Companion - Boole review, 
li:^ V\C-2i) Cartridge Games[VIC Firmware] - Keview.s ot 

Spiders Of Mdia, Saidliieb and Meieroiles. 
115 Pfflspced, An Optimizing Compiler For PET/CBM - 

Review. 
146 ATerminal OperaUng System For PETToHF3000+ - 

Descibcs a terminal operating syslem from a PET lo an 

HP3000 via a SADI interface and modem. 
\5A Ftuiii VIC-20 To fvlaiiiframe - A prugMm wliieli cdji 

handle a variety of communications needs for the VIC. 
1 tJO A Shape tlenerator hor Tfie Commodore fi4 - Hrofiram 

to draw a shape, examine il, modify it and s^ve it in 

DATA statements. 
168 Rasy File Input : The String Thing - Routine to a!low 

input fiom disk oi tape of strings up to 255 cliardcters 

in length. (PET/CBM /VIC/6-1) 
172 VICMicromon - Monitor with 34 commands. 
192 Cdpute! - PETMdtbiiie LaiigudytCump<ictur Fix. 
194 Machine Language : Serial Comunications - How to 

telecommunicate with the help of machine lani^uas^e. 

1 96 Programming VICs Function Keys - Machine language 
routine to assign keyphrases lo VIC function keys. 

202 PET : Picture Files - Save/load screen images to/from 
disk- (PET ' Upgrade/CBM 8032) 

206 Calling Routine For Marquee - Routine to allow inter- 
facing lo Marquee {Feb. 1982) from Basic. (PET/CBM - 
Upgrades 4.0) 

207 PET Inierfadrg - Introduction to PET interfacing with 
a simple example. 

223 VIC Plotting - Medium resolution pblting on ttie VIC. 

235 New Products - Interfaces For Commodore 64 And 
VIC: Job Costing And General Accounfing Program; 
VIC Scftwart; from Weslerji New Englaiid, A 40/80 
Character Expansion For The VlC-20; Terminal Emu- 
lation Package For The SuperPET; Fractions Programs 
For PET. TR3-80. And Apple. 

December 

10 Ask The Readers - VIC Soft Memory Recovery; Ma- 
chine Language Printing; Commodore 6'1 Peripherals. 

62 Simulator : Tiny Plan. A Modelmg Planner For Home 
Applicdliuiib - A computerized spreadsheet progrdui in 
Basic which will work in Si^ without a disk or printer. 

S4 CalCalc : Computerize Your Diet - A program to help 
you lose weight by cutting calories. 

96 All Sorts Of Basic Sorts - A selection of four different 
sorting routines in Basic. 

114 Part [I : How To Use SYS - The conclusion of this 



tutorial demonstrates tiow to handle complex multipli- 
cations in niaclnae language. 

126 Name Play - A user-friendly program aimed at pre- 
schoolers. Requies a printer, (PET/CBM/VIC) 

138 VIC And PET PILOT Interpreter - A low-budgel ap- 
proach to programming in PILOT. Supports stingtS) 
andnumer]c(")vanables. and the statements T, J, U,E, 
M, I C, A. H and End- 

1 52 Hidden Maze - You are trapped inside a maze and you 
can see only a stiort distance along its dark corndorsas 
you try to find your way out, 

161 Understanding VIC High Resolution Graphics - This 
article explores high resolution graphics on the 5K and 
extended 8KVIC-20. 

172 Supergraphics For PET - A review of John Fluharty's 
Supergraphics software, 

179 The VIC "Cardbodrd" - A review of ilie Cd^dbojrd 
Expansion Interlace. 

B m Mikro Cfiip Assembler For The PET - A review of the 

Mikro assembler from Skvle^ Electric Works. 
192 A Universal Program Lister-Thisprogramwill list any 

program in a way Ihat can be easily understood: al! 

special cbaracters for Commodore computers art: tdkcn 

into account. Requires a disk drive. 
208 VIC Block SAVE And LOAU - A program fo connect 

you to the kernal routines and allow l]ie saving or 

loading ol blocks of memory from/to tape. 
212 Commodore 64 Sprite Editor - Create and modify 

multicolored Sprites on the Commodore 64. 
215 Tiny Aid For VlC-20 - Add renumber, delete, find, 

Change and kill to the VIC 

224 Paper Monitor Switch For 2022 Printer - .Md an 
automatic out-of-paper switch to the Commodore 
20:^2 and 2024 printers. 

226 A Floppy With A Strange Device - This routine will 
change the device number of the 2040^ 4040, 8050 or 

2031 disk drives, 

227 VIC File Clerk -A program that allows you to store and 

quickly locate up to 60 pages of information on one 
cassette tape. 
230 Codemover - A PCT progratii ilidl alluws you lo easily 
move machine language programs from one area of 
memory to another. 

247 CheckUxjk - A clteckbLHik Ijaldnciiig program. 

255 Flashing Prompt For VIC and PET - A handy input 

routineto make your programs crash-prool. 

2S9 New Products - Light Pen For Ttie VIC-20; SuperPET 
Upgrade Board For CBM S032; Printer Programming 
Manual For VIC And Epson MX-80: Action Games For 
The VIC-20 (Videomania, Terraguard); PET Joystick 
interface; Carrying Case For Commodore 64 And VIC; 
Game From Avalon Hill (Andromeda Conciuesl); Com- 
munications Package For VersaModem, Spread Sheet 
For VIC. 

284 CAPUTEI-PET Laser Gunner; PET Picture Files; C64 

memory map; Micros with the Handicapped(Ott82) 
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ADVAAtAGB Computer Accessories 
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:C'f Oand Commodort 94 irt iradtmarhi uf Co 





NEW! 

Commodore 64® 

Software & Accessories 

We now have one of Ihe largest 
selecifonsof C64 

software & accessonos! 

BUSINESS 

PCS 6480 80 Column Board 

With a lop-rated wordprocessor 
Includes Data Base and 
Spreadsheet all linked 
together - package price$395.0G 

y/ordPac-wordprocessor $99.95 
InquirePac - Data Base $99.95 
CalcPac Sprcadshocl $99.95 
FilePac - Wailing List $79.95 
AccountPac - Home/Bus $69.95 
General Ledger $95.00 

EDUCATIONAL 

C64BAS:CTuorial $39.95 

C64 Tour - Overview $1 5.95 
Happy Tutor - Typing $29,95 

GAMES 

Cyclons - bestseller $39.95 

Skiman - slalom game $29.95 

Sluggo - boxfng game $29.95 

Casino Pac - 3 games $39.95 

UTILITIES 

Editor Pac - Prog. Aid $B9 95 

Assembler Pac $89.95 

PetSpeed 64 - Compiler $1 99 

PelSpeed 4000/8000 $249 



ACCESSOHIES 

80 Column Board 
RS232 Printer Interface 
Parallel Printer Interface 
Z-80 Board- runs 40 
AND80Colur^nCP/M 
VIC 20 /C64 Interface 
IEEE &RS232, totally 
transparent inter pod 



$2/9 
$129 
$129 

$399 



$245 



MODEM For VIC 20/ 064 

Accousticcoupod; one 

caDle to computer supplies 

all Signals and power: 

capable of 1 1 to 300 baud, 

full & hart duplex ■ originate. 

Assembled & tested, with soltware 

but without case Only $129 

Mail Order Information: 

All prices in Canadian dollars 
Available from your Commodore 
dealer, or if not. send cnec-^ or 
money order {include 7% sales Xax) lo 

COMPUTER WORKSHOPS 

465 King Street East #9 

Toronto. Ont. MSA 1L6 

Phone (416) 366-6192 

Dealer Inquiries Invited 




Basic Utility for the 
Commodore 64 

POWER 64 

•easy to learn 
•easy to use 
^program faster and 
more efficiently 

with better results 
•MOREPOWER 
included FREE 

Posverful Programmer' I Utiltty 

by Br*oTempleion 

Manual ft^ Jirn Buicerfie'd 

St9.W from your local Commodore dealer. 
For your n«ar«fit d«alftr call; 

(416)273-6350 
PRQ-LINI 



755 ThC QUCcNSW^Y EAST UTMT a 
MSS6SALJGA QhJTARIG L*Y 4C5 



PRO-LINE 



A CANADIAN COMPANY 

designing, 

developing, 

manufacturing, 

publishing 

and 

distributing 

microcomputer 

software 

DEALER ENQUIRIES WELCOME 
AUTHOR'S SUBniSSICNS INVITED 

CALL OR WRITE 

(416)273-6350 

PRO-LINE 

^m Bllll so PT\A//t n E 

7S!j "tH£ QLEENS^^Ay EAJt UN T 9, 
MISSISSAUCA, ONTARIO L4T 4CS 
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rcade challenge, 
\ accuracy. 



precision, 



^ckl 



qualit]f^ 
^ensitivit)^^ 
and excitement 

V \ \ \ \ \ 

ow yours, 




\ Wlio biso l)ul WICO could mak 
\ lliaLctJim? WICO is Iho wotlil s^ 
argslf cfoslgnnr nnd mr in it. nc hirers 



arg^doslgnor nnd mi 
of controls for ihe iirciulo. 





Wfiie today (or our alesti 

ACWArvtACB Computer Accessories 

1020 Meyerside Dr, Units 7 & e.Mississaufla, Ontario L5T 1J4 (416) 676-1200 
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Software first, 
computer second. 

Workhorse solutions 
for tough questions. 

OK. \buYe ready to buy a computer. Here's how 
to make an intelligent business decision. 

Decide on your software first No computer 
is better than the software that runs the op- 
eration. No software is better than Southern 
Solutions.. VUe have real business account- 
ing and record keeping software that is 
right for today's business world. It runs - ^^^^^ 
on the best line of computers avail- 
able todcry: Commodore including 
the exciting new Commodore 64^". 

Compare our software solu- 
tions vdth otiiers: 

FileGuard™ protects your 
files from loss even by power 
failure. 

SuperMath'^" meets your 
needs as your business ex- 
pands. Our software with 
SuperMath will handle numbers 
up to 31 billion. Most micros stop 
at far less. 

You can design your Balance 
Sheet, P&L, Budget Analysis, etc. 

Complete Systems or Individual 
Modules handle general ledger, ac- 
counts receivable and payable, bill- 
ing, payroll, mailing lists, oil ac- 
counting, pharmacy management. 
encumbrance accounting, etc. 

Our software uses practically 
any printer and grows as your 
needs expand. 

Real business software for 
real business computers. 
Capability you need at prices you can 
afford. 

Vbur professional computer dealer can 
help you make a computer become a productivity 
tool. For a demonstration, visit 

Distributed in Canada by: Canadian Micro 

DJslribulors Ltd' 
500 Steeles Avenue 
Milton, Ontario 
L9T 3P7 




Now For The 
Commodore 64 



PC. Box P' 
McKirney. Texas 
75069 
(214)542-0278 



A DMsion of BMB CompuScience Ltd, 



jL 



Commodore SA- is a Trademark of Commodore Business Machines, Inc." 



CBM INTERFACES 

The Connecting Links 

Increase Your Computer's 
Ability 

CBM PntNTER ADAPTERS 

— addressaDte-swUch selectable up- 

per/iowGf. lowBf/upper case 
-works with BASIC, WORDPRO. 

VI5ICALC and otner software 
—IEEE card edge conneclor for 

conneclmg disks and other 

peripherals to the PET" 
—power from primer unless oiher- 

wiss noted 

RS-232 SERIAL ADAPTER - baud 

rates to 9600 — power suppt/ 

included 

MODEL-ADA 1 450a $149.00 

CE NTRON I CS/N EC PARALLE L 

ADAPTER — Centronics 36 pm 

riboon connedor — handles 

graphics 

MODEL ADA 1800 $129.00 

COMMODORE 64^ to RS-232 
CABLE ADAPTER 

—plugs into RS-232 port — provides 
voltage con versions to drive 
standard fl5-232 pnniers, ternnir- 
ais and mainframes —6 foot cattle 
included — receives power (rom 
computer — uses address #2 

—electronics tult/ enclosed — case 
2V* X 2 inches 

MODELADA64WF 

(Female Connector} $79,00 

MODEL ADA 64101^ 

(Male Connector) $70.00 

MODEL ADA64U5 

Modem Cable $7900 

COMMUNICATIONS ADAPTER — 

serial & parallel ports — true ASCII 
conversion — baud rates to 9600 — 
half or full duplex - X-ON, X-OFF — 
selectable carriage return delay — 32 
character duller — Centronics 
compatible — powGf supply 
included 
MODEL SADt $295 00 

ANALOG TO DIGITALCONVERTER 

— 1 6 channels — lo 5.1 2 voJl input 

voftage range — resolution 20 milli- 

vollB per count — conversion time 

less than 100 microseconds per 

channel 

MODEL'PETSETI $295.00 



US Doliars Quoted 

$5.00 Shipping & Handling 

MA5TERCMARGE / VISA 

IN THE USA oraer from: 

Connecticut rr^icroComputer, Inc. 
36 Del Uar Drive 
BrooktieidXT 06904 

(203^ 775-4595 TWX: 710 J56-0052 

m CANADA ortjer Irom: 
Bsn«rios induded. Ltd 
186 Queen 5Us«l West 
Fe TcKomo, Canada M5V ISI 
(4161 596-1405 

Dealer inquiries (nviiea 




Assembler for the 
Commodore 64 

FyU-64 

* easy to learn 
*easy to use 
•fast 

• comprehensive 
manual 

Person^ assembly language 

by brad Temple ton 

abo available for the Commodore 

4.000 - 9.000 - 9,000 Krr« 

S99.95 from your local Commodore dealer, 

For your neireit dealer call: 

(416)273-6350 
PROLINE 

755 TH€ quEENSWAt f AST UNIT 
mSSSSfKUGft. ONTARIO L»t *Cb 



VIC-20 .. CBM 64 

EXPHNDER BDHRDE 

PT1 offers the finest selection 
of expanrfpr hn^rds available 
for the VIC-20 ard CBM 64 
TVie design fealures, quality 
construction, and competitive 
priced make any of Ihem an 
exceptional value. New pro- 
ducts are Deing added rnonlhiy. 
so write tor complete catalog. 




d 3lol to* the 64. TuQLile sw^lf^hes and 
raa*i i witch. 

P/N C64 *69 95 





G Slot lor ttit VIC. Toggle swilcties 
and resel s^iicK 

P/N V36 '79.95 



SlQlfor tFieVlCrNc switcnes rese'. or 
fuse 

P/N V13 M9.95 





fiCW 



P/N V24 *69.fl5 



ftlEClSlO^ T£CHNOLOaV INC 

COUPOTFR PRCiPUrTS DIVISION 

l> d ROV 1^11^4 

Ul T iiKF nr^ UTAH 1411^ 



iiaU4ai-fi366 



3 SLdI tor \ht Vic. S'ae sMii^hea. no 
rea«t switch 

P/N V23 "Sfl 95 

See /our dealer, or place 
your order direct 

\/lSA-M'C-CHECK-COD 
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Advantage Computer Ace. 


VIC 20 games 






70 


Qeacc^n Scflwdre 


Buiiiness Packai^es 






74 


Computer Marketing 

\Cariadian Micro 


Calc Result (spreadsheet prujj.) 


Handle Software ab 




IBC IBC 


Micro Applications 


Master (proi^ram mi nij aid) 




IBC 




Pariflc Coasi Software 


C64: Utility. Business, Games 






63 


Preciaon Software 


Superscript (word processor) 




61 




Pro- Line Soltware 


PAL 64 (assembler) 

POWER SA (programming aid) 






79 
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5cutherri Solutions 


Business packages 
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Wycnr Busint^ss Systems 


Provincial Payroll 
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1 lard ware 
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fo m pi 1 tPT Wf >r k "ih op^ 

\Computer Marketing 


Z-RAM{CP/M board) 


Madison 
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Connecticut microcomputer 


PET/CBM Interface adapters 
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Precision TechtKjJogy 


\'\C20/CB'\ Expander Boards 
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Richvale Telecom muni cations 


C64Liak (IEEE adapter) 


1 




IFC IFC 


Accessories 
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Advanlaijt? Cuniputci Ace, 


Juy sticks 


Wlco 
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Computer Workshops 


Aprft.1 products list 
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Consultora Intl 


Slock Market With Your PC (book) 




64 




n* 


A To Z Book O! Games 




64 


+ 


|i 


Dynamics Of Money Mgml (book) 




64 
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Fl 


Invnient Aiidlysis w/YoLir Mkro (book) 
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LeacUng Edge Inc. 


Elephant Diskettes 




BC 


RC BC 


Toronto PET Users Grciup 


Membership info 
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April 1983 



A More Powerful Planning 
And Forecasting Tool Than Any Other On The Market 
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Available now for 8032 and 8096 com/ng soon for Commodore 64. 

ran furtmeh iNronMAnoN conjact your nearesi commodore dealer 



OR 



IN CANADA 

CANADIAN MICRO DISTRIBUTORS 
WO Sttatoi AvHniw _ 



INTHEU-3A 



COMPUTER MARKETING SERVICES INC. 

50n Wfist Mirllon Pikir. Suit! 7t 
Chef'v Hill. New Jetaey U S A. 06002 



CALC RESULT is a trademark of Handic Soffwnm nh 





'NCVER 



KORGETSr 



MORE THAN JUST ANOTHER PRETTY HUJE. 



Sayi who? Soys ANSL 

Sptcificully, ^ubcommitloe X3B8 of rhe Ariittrlcon 
Nationol Standards InstiTute (ANSI) says so. Th© foct 
ii dl Elephont^^ floppiai meet or exceed (he ipeci 
required to meet or d>ceed all their standards. 

Bui just who is "subcommiHee XSBS" to issue- ;»ui.h 
pronouncemsnts! 

TheyVfj a qroup of people reprewitlnQ a large, 
well-balanced crosi section of disciplines— from 
acadomia, government agencies, and the computer 

industry People from places like IBM, Hewlett-Packard, 
3M, Lowrence Livemiore Labs, The U.S» Department 
of Defense, Honaywetl and The Association of Cofn - 
puter Programmers and Analysts. In short, its a bunch 
of high -caliber nitpickers whose mission, it seems, in 
order to moke better disks for consumers, is also to 



make life misernble for everyone In the disk-making 
business. 

How? By gathering together periodically (often, 
one luipectt, under the full moon) to concoct more 
and more rules to increase the quality of flexible 
diikt. Their most recent njlo book runt over 20 single- 
spaced pages— listing, and iofisting upon— hundreds 
upon hundreds of standards a disk must meet in 

order to be blessed by ANSL [And thereby be taken 
seriously by people who take disks serbusly<) 

In fact, if you d like a copy of this formidable docu* 
ment, for free^ just let us know and we'll send you 
one. Recause once you know what It takes to make 
an Elepl".^nt .or ANSI . . . 

We think youll want us to moke some Elephants 
for you. 



ElEPHANl HEAVY DUTY DiSKS. 

For o free poster -sizo portrait of our powerful pQchyderm, pleuse write us. 
Diitributed Exclusively by Leading Edge Products, Inc., 225 Turnpiko Street, Canton, Mossachusett. 02021 

Call: toll-+ee l'flOO-343-6833; or in Massachusetts call collect ^617) Hl^H-aiiU. Itjiex 951-624. 



